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\^j  ABSTRACT 

A  significant  portion  of  the  energy  in  th*  United  States 
today  is  used  for  comfort  cooling  and  heating.  Fifteen  or  twenty 
years  ago*  when  energy  was  inexpensive*  there  was  little  economic 
pressure  for  engineers  to  provide  an  energy  efficient  facility 
design.  In  recent  years*  energy  efficiency  has  become  a 
significant  consideration  in  the  design  of  a  new  facility.  To  aid 
in  the  design  effort*  many  computer  programs  have  been  developed 
to  predict  energy  use.  The  complexity  of  these  programs  has  made 
them  difficult  to  use  and  not  readily  accessible  to  the  practicing 
engineer.  The  objective  of  this  work  is  to  develop  a  simple  tool 
for  characterizing  facility  energy  consumption  as  a  function  of 
the  space  loads*  the  HVAC  system  and  control  method  selected  and 
appropriate  equipment  parameters.  j 

The  computer  code  developed  is  based  on  simplified 
algorithms  and  contains  an  extensive*  easy  to  use,  interactive 
input  routine.  It  is  written  for  use  on  a  microcomputer.  With 
the  space  loads  taken  as  inputs  to  the  program,  the  emphasis  is 
placed  on  the  system  simulation  and  providing  flexibility  in  the 
choice  of  systems  and  controls  options.  As  many  variables  as 
possible  are  coded  with  default  values*  thus  giving  the  user  the 
option  to  change  them  to  fit  the  specific  need. 

This  thesis  describes  the  theory  behind  the  equations 
used  in  the  program  and  the  logic  used  to  develop  the  computer 
code.  The  program  was  tested  by  performing  case  studies,  each 
consisting  of  several  twenty-four  hour  simulations.  A  loads  and 
weather  data  base  from  a  single-story  Phoenix,  Arizona  facility 
was  used  for  the  case  studies.  The  results  of  these  studies  show 
that  the  program  reacts  well  to  system,  control  and  economizer 
variations.  Although  future  refinements  and  additions  are 
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possible,  the  simplified  tool  developed  in  this  work  should  prove 
beneficial  to  the  HVAC  engineer»  especially  fori  peak  loading 
parametric  studies. 
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A  significant  portion  of  the  energy  in  the  United  States 
today  is  used  for  comfort  cooling  and  heating.  Fifteen  or  twenty 
years  ago,  when  energy  was  inexpensive*  there  was  little  economic 
pressure  for  engineers  to  provide  an  energy  efficient  facility 
design.  In  recent  years*  energy  efficiency  has  become  a 
significant  consideration  in  the  design  of  a  new  facility.  To  aid 
in  the  design  effort,  many  computer  programs  have  been  developed 
to  predict  energy  use.  The  complexity  of  these  programs  has  made 
them  difficult  to  use  and  not  readily  accessible  to  the  practicing 
engineer.  The  objective  of  this  work  is  to  develop  a  simple  tool 
for  characterizing  facility  energy  consumption  as  a  function  of 
the  space  loads,  the  HVAC  system  and  control  method  selected  and 
appropriate  equipment  parameters. 

The  computer  code  developed  is  based  on  simplified 
algorithms  and  contains  an  extensive,  easy  to  use,  interactive 
input  routine.  It  is  written  for  use  on  a  microcomputer.  With 
the  space  loads  taken  as  inputs  to  the  program,  the  emphasis  is 
placed  on  the  system  simulation  and  providing  flexibility  in  the 
choice  of  systems  and  controls  options.  As  many  variables  as 
possible  are  coded  with  default  values,  thus  giving  the  user  the 
option  to  change  them  to  fit  the  specific  need. 

This  thesis  describes  the  theory  behind  the  equations 
used  in  the  program  and  the  logic  used  to  develop  the  computer 
code.  The  program  was  tested  by  performing  case  studies,  each 
consisting  of  several  twenty-four  hour  simulations.  A  loads  and 
weather  data  base  from  a  single-story  Phoenix,  Arizona  facility 
was  used  for  the  case  studies.  The  results  of  these  studies  show 
that  the  program  reacts  well  to  system,  control  and  economizer 
variations.  Although  future  refinements  and  additions  are 
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BACKGROUND 

1.1  INTRODUCTION 

A  significant  portion  of  the  energy  in  the  United  States 
today  is  used  for  comfort  cooling  and  heating.  Fifteen  or  twenty 
years  ago*  when  energy  was  inexpensive*  there  was  little  economic 
pressure  for  engineers  to  provide  an  energy  efficient  facility 
design.  In  recent  years*  energy  efficiency  has  become  a 
significant  consideration  in  the  design  of  a  new  facility. 

To  accomplish  this  end*  many  computer  programs  have  been 
developed  to  predict  energy  use.  Too  few  of  these  are  geared  to 
microcomputers  and  thus,  mainframe  computers  must  be  used.  For 
small  engineering  consulting  firms,  the  use  of  mainframe  programs 
may  either  be  cost  or  time  prohibitive.  Microcomputers  are 
emerging  as  an  essential  tool  in  many  aspects  of  the  design 
process.  Even  the  smallest  consulting  firm  is  now  usually 
equipped  with  a  microcomputer.  Thus*  emphasis  on  the  development 
of  energy  design  aid  programs  has  switched  from  the  mainframe  to 
the  microcomputer.  A  number  of  microcomputer  based  energy 
programs  have  been  developed.  However,  they  generally  do  not 
provide  a  mechanism  for  examining  the  effects  of  variation  in  HVAC 
system  control  strategies  on  energy  use.  Thus,  the  objective  of 
this  research  has  been  to  develop  a  simple  tool  for  characterizing 
facility  energy  consumption  as  a  function  of  the  space  loads,  the 
HVAC  system  and  control  method  selected  and  appropriate  equipment 
parameters.  In  this  development*  zone  and  envelope  loads  were 
taken  as  given  inputs  for  this  analysis.  Thus,  the  focus  of  this 
work  has  been  the  development  of  a  simplified  system  simulation 
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program  to  be  used  to  characterize  HVAC  system  performance  as  a 
function  of  systems  and  control  strategy  selection.  The  main 
emphasis  was  to  provide  a  product  which  was  tailored  for  a 
microcomputer,  easy  enough  for  the  designer  who  has  little 
experience  operating  a  microcomputer  and  which  provided  the 
greatest  amount  of  flexibility  for  selecting  system  parameters  in 
systems  design.  This  would  provide  a  means  of  choosing  an  HVAC 
system  which  would  produce  the  most  energy  efficient  facility 
design  in  the  minimum  amount  of  time.  Aside  from  its  use  for 
future  research  and  subsequent  inclusion  in  an  overall  simplified 
character ization  of  facility  energy  use,  this  work  was  tailored  to 
allow  the  designer  to  see  the  effects  of  system  and  control 
parameter  variation  on  system  load  over  a  twenty-four  hour  period. 
Such  results  could  be  beneficial  in  the  reduction  of  peak  system 
demand,  as  well  as,  energy  conservation. 

This  work’s  intent  was  not  to  provide  a  tool  for 
accurately  predicting  energy  consumption;  but  rather  to  enable  the 
designer  to  compare  possible  HVAC  system  and  control  strategies 
for  a  particular  facility  and  location  relative  to  other  systems 
and  strategies  available. 

The  HVAC  systems  considered  specifically  were  the 
Terminal  reheat  system,  Variable  Air  Volume  (VAV)  system  with 
induction  type  reheaters  and  a  cycling  system  with  varying  control 
and  economizer  options.  The  control  strategies  modeled  were  a 
fixed  cooling  coil  set  point  method,  a  zone  controlled  method  and 
an  outside  air  control  method.  This  last  method  requires  a 
schedule,  which  matches  a  leaving  coil  air  temperature  with  a 
specific  outside  air  temperature,  be  input  by  the  user  of  the 
program.  The  economizer  options  included  the  use  of  an  outside 
air  dry  bulb  temperature  economizer,  enthalpy  controlled 
economizer  or  no  economizer  at  all.  Under  the  specific  objectives 
of  this  work,  fans  were  modeled  only  to  the  extent  that  their 
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performance  affected  the  temperature  of  the  supply  and  return  air 
mixture.  Constant  speed*  variable  speed  and  cycling  fans*  as  well 
as  the  use  of  inlet  or  discharge  dampers  for  control,  were 
included  in  the  program.  Since  not  all  systems  have  the  fan  motor 
directly  in  the  air  stream  and  others  do  not  even  use  a  return 
fan,  these  were  also  made  options  to  the  user.  Additionally,  this 
tool  allows  the  researcher  to  vary  the  amount  of  insulation 
installed  on  the  duct  work,  the  air  velocities  in  the  duct  system, 
the  fraction  of  lighting  energy  which  is  released  into  the  return 
plenum,  the  ceiling  panel  transmission  values,  the  maximum  outside 
air  temperature  allowed  for  economizer  operation,  the  amount  of 
air  leakage  into  the  plenum  and  the  maximum  leaving  coil  air 
temperature. 

1.5  LITERATURE  REVIEW 

□f  the  numerous  mainframe  energy  prediction  computer 
programs  which  have  been  developed,  two  seem  to  have  emerged  as 
the  most  frequently  used  by  the  engineering  profession.  These  are 
the  Building  Loads  Analysis  and  System  Thermodynamics  (BLAST) 
Program  and  DOE  5  series  programs. 

The  BLAST  Program  was  developed  by  the  Construction 
Engineering  Research  Laboratory  of  the  U.S.  Army.  Its  strength 
lies  in  its  treatment  of  some  specific  heat  flows  within 
facilities.  It  is  not  as  widely  accepted  or  utilized  as  the  DOE  5 
series  programs  because  it  is  not  able  to  simulate  a  wide  variety 
of  HVAC  systems  and  controls  strategies.  Since  the  main  thrust  of 
this  work  was  on  the  system  rather  than  the  space  loads  level,  the 
BLAST  program  was  not  examined  in  detail. 

On  the  other  hand,  the  DOE  5  series  programs,  developed 
and  maintained  by  at  the  Lawrence  Berkeley  Laboratory,  are  able  to 
handle  many  different  systems  and  controls  strategies.  The  5. 1C 
version  of  this  program  was  examined  more  careful ly . C 1 ,5]  The 
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zone  extraction  rates  (space  loads)  and  weather  data  used  in  the 
case  studies  presented  here  were  taken  from  DOE  2. IB  output.  The 
decision  was  based  on  the  accessibility  to  the  program  and  its 
ability  to  produce  output  in  the  form  required  for  input  to  the 
program  developed  by  this  research. 

One  simplified  method  for  determining  facility  energy 
consumption*  using  the  Modified  Bin  Method*  was  developed  by  a 
team  headed  by  David  E.  Knebel.[31  Knebel’s  team  used  averaging 
techniques  in  the  determination  of  space  and  system  loads.  These 
techniques  may  lead  to  inaccuracies  when  faced  with  the  loads  for 
a  massive  facility  but*  as  with  this  work*  the  team  decided  that 
the  added  accuracy  was  outweighed  by  the  increased  computational 
complexity.  Their  work  resulted  in  a  computer  code  which  included 
five  HVAC  systems  and  four  control  methods.  It  was  felt  that, 
though  comprehensive  and  easily  understood,  the  work  did  not 
adequately  address  duct  system  heat  and  volume  losses  for  the 
purposes  of  this  work.  Additionally,  they  used  a  constant  "1.1" 
term  for  the  specific  heat  divided  by  the  specific  volume  in  the 
loads  computations.  Since  the  specific  volume  is  a  function  of 
both  the  temperature  and  moisture  content,  the  constant  term  could 
introduce  as  much  as  a  5'/.  error.  It  was  decided  to  use  the 
variable  specific  volume.  Knebel’s  methods  for  determining  the 
temperature  rise  of  the  supply  and  return  air  due  to  the  fans  were 
employed.  The  equations  used  were  derived  from  fan  law 
relations. £4,53 

This  work  was  conducted  on  the  premise  that  facility 
energy  consumption  could  be  characterized  by  considering  the 
facility  usage  schedule,  space  loads  and  system  and  equipment 
performance  separately.  Given  this,  facility  energy  performance 
could  be  expressed  in  the  form: 

E=  (  Q»P»Ct  )  *  (  E SCHEDULE  )  *  (  F*YBTEH  )  *  (  F PLANT  )  (  1  ) 


where 


E=Facility  Energy  Consumption(Btu/yr ) 

Q»*»c*=Aggregate  Space  Load(Btu/yr) 

F»c»e»uLe=Schedule  Factor 
Fav8Ten=HVAC  System  Factor 
FauM«T=Plant  Factor 

Previous  research  on  the  first  term  on  the  right  hand  side  of 
equation  <1)  has  been  accomplished.  The  objectives  of  the  team 
who  conducted  the  research  on  G^PAce  were  to  develop  standard 
facility  energy  performance  targets  which  would  "result  in  cost- 
effective,  energy  efficient  design  of  commercial  bui ldings. "[63 
The  results  of  their  work  included  an  equation  for  G^acc  basically 
in  the  form: 

Q«rAce=f < CONDUCT ION) +f< SOLAR  GAIN)+f <LIGHTING)+f (OTHER)  (E) 

In  this  equation,  f (OTHER)  consisted  of  miscellaneous 
internal  loads  and  infiltration  and  ventilation  loads.  And  though 
the  f (OTHER)  term  was  sometimes  very  high,  it  was  not  within  the 
scope  of  their  research  to  study  it.  Also,  OarAce  referred  to 
overall  consumption  rather  than  merely  aggregate  space  load.  In 
order  to  arrive  at  some  consumption  values,  a  specific  HVAC  system 
had  to  be  chosen.  The  system  chosen  was  the  constant  volume 
terminal  reheat  system.  Both  the  DOES. 1C  and  BLAST  energy 
prediction  programs  were  used  in  developing  the  large  data  base 
required  to  accomplish  the  parametric  studies  used  to  determine 
the  coefficients  in  equation  (E)  above.  At  the  time  this  report 
was  written,  teams  from  Battel le  Pacific  Northwest  Laboratory  and 
the  American  Society  of  Heating,  Refrigerating  and  Air 
Conditioning  Engineers  (ASHRAE),  had  begun  follow-on  work  to  the 
above  mentioned  project.  The  program  developed  by  this  research 


should  provide  a  tool  to  assist  in  the  determination  of  both  the 
f (SYSTEM)  and  f < SCHEDULE >  terms  of  Equation  (1). 

The  ASHRAE  Handbook  of  Fundamentals  was  consulted  on 
numerous  occasions  during  the  period  of  this  research . [7*83  The 
procedures  contained  within  were  followed*  at  least  in  part*  in 
the  determination  of  humidity  ratios  and  certain  enthalpy  values. 
The  tables  included  in  the  Psychrometrics  chapter  formed  the  base 
for  many  of  the  curve  fit  equations  used  in  this  work. 


CHAPTER 


METHODOLOGY 

g.l  ASSUMPTIONS 

A  number  of  assumptions  had  to  be  made  in  the  procc-»s  of 
defining  the  model  to  reduce  program  running  time.  In  making 
these  assumptions*  care  was  taken  to  structure  the  program  to 
allow  the  user  to  modify  the  values  of  constants  and  the 
coefficient  of  curve  fit  equations  to  adapt  analyses  to  particular 
situations  simulated. 

First*  it  was  assumed  that  the  facilities  modeled  would 
have  an  above  ceiling  return  plenum  which  contained  the  supply 
duct  system.  It  was  also  assumed  that  the  plenum  temperature  was 
uniform  and  that  no  return  duct  would  be  utilized.  Heat  flow 
into/out  of  the  plenum  was  assumed  to  occur  through  exterior  walls 
and  the  ceiling.  Air  leakage  and  heat  transfer  from  the  supply 
duct  system,  heat  gain  from  the  back  surface  of  lighting  fixtures 
and  return  air  flow  were  also  balanced  in  determining  plenum 
temperature. 

It  was  difficult  to  quantify  the  error,  if  any, 
associated  with  the  assumption  of  uniform  temperature  throughout 
the  plenum.  This  is  due  to  the  plethora  of  situations  which  are 
possible  for  duct  sizing,  exterior  wall  area,  obstructions  in  the 
plenum  and  zone  set  point  temperatures,  among  others.  Except  in 
extreme  cases,  the  primary  factor  defining  the  plenum  temperature 
is  the  air  returning  from  the  individual  zones.  Since  the 
individual  zone  set  point  temperatures  are  usually  the  same,  or  at 
least  very  nearly  the  same,  the  air  entering  the  plenum  from  the 
zones  at  different  points  should  also  be  at  the  same  temperature. 


It  was  assumed  that  small  temperature  gradients  in  the  plenum 
will  have  little  effect  on  an  average  hourly  return  air 
temperature  and  overall  heat  transfer  to  the  duct  system.  A 
plenum  temperature  which  was  not  uniform  would  effect  the  heat 
transfer  to  the  supply  duct  system  at  specific  points*  but  in 
normal  operation  the  effect  on  the  overall  duct  heat  transfer 
should  be  negligible. 

For  situations  where  this  program  is  to  be  used  to 
simulate  multiple  story  facilities,  the  program  will  calculate  one 
average  plenum  temperature.  If,  in  the  particular  instance,  this 
is  not  accurate  enough,  the  facility  can  be  modeled  as  having 
multiple  systems.  Each  system  would  service  a  single  story  and 
the  resulting  system  loads  would  be  added  together. 

Moist  air  consists  of  a  mixture  of  dry  air  and  slightly 
superheated  water  vapor.  The  water  vapor  behaves  as  an  ideal  gas 
for  the  temperatures  and  pressures  encountered  in  HVAC 
operations. C93  The  enthalpy  of  the  moist  air  is  defined  as 


h=Cr«*T+W*hB 


(3) 


where 


h=Enthalpy (Btu/lbm) 

c,.*=Spec if ic  heat  of  dry  air  at  constant 
pressure (Btu/lbm-°F ) 

T=Temperature  of  air  mixture('F) 

W=Humidity  ratio(lbm  of  water/lbm  of  dry  air) 
ha=Enthalpy  of  saturated  steam  at  air  mixture 
temperature  <  Btu/ lbm) 


Small  errors  result  from  using  a  constant  value  of  specific  heat 
and  from  the  fact  that  while  the  value  of  h,  is  for  saturated 
vapor,  the  water  vapor  in  the  mixture  is  usually  slightly 
superheated . C91 


Air  mixture  velocity  was  assumed  to  be  constant  along 
major  segments  of  the  supply  duct.  The  "maximum  trunk  duct 
velocity"  term  called  for  as  input  at  the  beginning  of  the  program 
was  used  for  the  determination  of  the  trunk  duct  cross  sectional 
area  using  equation  <4)  below. 


Ab=CFM/V 


<  4 ) 


where 


Ao^Cross  sectional  duct  section  area(ftB) 
CFM=Volumetric  f low<f t*/min) 

V=Maximum  duct  velocity(ft/min) 


The  "maximum  zone  branch  duct  velocity"  input  does  the  same  for 
the  branch  ducts.  The  purpose  for  using  the  term  "maximum"  was 
because  in  VAV  systems  operating  at  off-design  conditions,  the 
velocities  would  be  lower.  For  the  VAV  system  option,  the  average 
hourly  velocities  are  considered  as  constant  for  the  hour,  with 
new  values  established  for  each  hour. 

The  values  for  the  specific  heats  of  dry  air  and  water 
vapor  were  assumed  to  be  independent  of  temperature.  This  is  a 
reasonable  assumption  in  the  range  encountered  in  normal  HVAC 
applications.  The  value  of  the  specific  heat  of  dry  air  in  the 


temperature  range  of  50°F  to  110°F  was  determined  to  be 
0.236585Btu/lbm-°F  <+0.4*/.)  and  the  value  of  the  specific  heat  of 
vapor  was  determined  to  be  0.44B833Btu/lbm-°F  (+0.7*/.)  .[10]  The 
error  that  would  be  introduced  in  assuming  this  constant  specific 
heat  value  would  be  less  than  2*/,  for  temperatures  as  low  as  -10°F. 

The  supply  duct  system  was  assumed  to  be  made  up  of 
round  ducts  for  the  purposes  of  calculating  duct  surface  area, 
temperature  rise,  and  heat  loss.  No  provision  was  made  for 
modifying  equations  for  the  use  of  square,  rectangular,  or  flat 
oval  ducts.  For  heat  loss  purposes,  it  was  assumed  that  the 


entire  exterior  surface  area  of  the  duct  was  exposed  to  the  plenum 
air . 

It  was  also  assumed  that  all  of  the  air  leakage  from  the 
supply  duct  system  to  the  plenum  occurred  in  the  immediate 
vicinity  of  the  supply  fan.  Therefore,  the  temperature  of  the  air 
leaked  to  the  plenum  was  taken  to  be  the  air  temperature  leaving 
the  fan.  This  volume  of  lost  air  contributed  directly  to  the 
reduction  of,  or  increase  in,  the  temperature  of  the  plenum  air. 
It  was  calculated  as  an  addition  to  the  air  volume  required  to 
satisfy  the  individual  zone  space  loads.  Using  the  assumption 
that  the  zone  loads  were  completely  satisfied,  at  least  with 
respect  to  air  volume  delivered,  insured  that  the  most 
conservative  approach  to  duct  leakage  was  taken.  This  procedure 
forced  the  maximum  amount  of  air  volume  to  cross  the  coils.  The 
total  temperature  rise  in  the  supply  duct  system  is  usually  5°F  or 
less  for  most  systems.  Since  the  greatest  percentage  of  leakage 
in  a  duct  system  occurs  at  the  supply  fan,  it  was  assumed  that  the 
error  associated  with  lumping  all  the  leakage  there  did  not 
warrant  incrementally  leaking  a  percentage  of  the  volume  along  the 
duct  sections.  Also,  if  the  user  were  to  calculate  duct  leakage 
incrementally,  he  would  be  required  to  provide  much  more 
information.  The  benefits  in  increased  accuracy  of  assuming 
distributed  losses  could  not  justify  this  added  level  of  input. 

Duct  leakage  is  input  by  the  user  as  a  percentage  of  the 
total  volume  of  air  crossing  the  coils,  as  opposed  to  a  percentage 
of  the  total  volume  of  air  required  to  satisfy  the  individual 
zones  loads.  An  incorrect  user  input  would  result  in  a  1  */.  lower 
total  air  volume  crossing  the  coils  for  each  1*/.  of  duct  leakage 
estimated.  However,  the  overall  error  in  the  coil  load 
calculation  could  end  up  being  much  less  during  many  periods  of 
operation.  For  example,  when  the  system  is  operating  in  the 
cooling  mode  and  the  minimum  amount  of  outside  air  is  being  used, 


the  reduced  volume  of  air  crossing  the  coils  due  to  an  incorrect 
leakage  estimation  is  offset  by  the  increased  mixed  air 
temperature  entering  the  coils.  This  is  due  to  the  increased 
plenum  temperature  associated  with  the  lower  volume  of  cool  air 
leaked. 

Another  thing  to  note  with  the  duct  leakage  term  is  that 
the  user  inputs  a  percentage  loss  C/./100)  which  remains  constant 
throughout  the  twenty  four  hour  simulation.  For  the  constant 
volume  terminal  reheat  and  cycling  system  modeled  this  should  be 
the  case,  but  for  the  VAV  system  there  may  be  slight  variations 
due  to  velocity  and  pressure  changes  in  the  duct  system  over  the 
twenty  four  hour  period.  Without  much  more  detailed  information 
on  the  specific  system  components  and  duct  system  simulated?  this 
difference  would  be  difficult  to  quantify.  However,  these  effects 
will  tend  to  cancel  each  other,  producing  approximately  the  same 
percentage  duct  leakage.  Again,  it  was  decided  to  take  the 
conservative  approach  and  use  the  maximum  leakage  at  design 
conditions. 

A  supply  fan  will  always  be  used  and  therefore,  the  user 
must  input  supply  fan  data.  The  user  can,  though,  opt  to  use,  or 
not  use  a  return  fan.  With  either  fan,  the  choice  of  whether  or 
not  to  locate  the  fan  motor  in  the  air  stream  is  left  up  to  the 
user . 

5.5  LIMITATIONS 

Since  the  program  was  developed  to  produce  results 
quickly,  using  simplified  techniques,  it  does  have  limitations 
which  must  be  deemed  acceptable  by  the  user.  Absolute  accuracy  in 
predicting  energy  consumption  was  not  the  major  criteria  by  which 
simulation  techniques  and  equations  were  chosen.  However,  every 
attempt  possible  was  made  to  include  all  contributions  to  system 
load.  This  should  be  evident  by  the  above  mentioned  assumptions. 


The  strength  of  this  work  lies  in  its  ability  to  identify  the 
primary  performance  characteristics,  relative  to  systems  and 
controls  choices. 

The  procedure  used  in  determining  the  temperatures  and 
loads  in  this  program  is  based  on  time  averaging.  All  final  and 
intermediate  results  are  average  hourly  values.  Therefore*  it  has 
problems  when  the  conditions  of  a  simulation  are  highly  time 
dependent.  It  is  understood  that  massive  facilities  can  cause  a 
substantial  thermal  lag  in  the  transmittance  of  space  loads  to  the 
system  and  that  the  space  set  point  temperature  is  maintained  only 
within  a  throttling  range.  It  is  assumed,  though,  that  the  loads 
and  temperatures  input  to  this  program  are  based  on  the  dynamic 
characteristics  of  the  spaces  and  that  the  net  hourly  values  are 
representative  of  real  loads  averaged  over  the  time  period.  The 
premise  for  the  values  calculated  here  is  that  the  average  hourly 
values  are  equal  to  the  net  time  dependent  energy  rate. 

The  equations  used  also  have  no  capability  to  correct 
for  deviations  in  barometric  pressure  or  altitude.  They  assume 
standard  barometric  pressure  of  14.696  psia  at  sea  level.  For 
most  applications,  it  was  determined  that  the  increased  accuracy 
realized  by  the  inclusion  of  corrections  for  such  deviations  could 
not  justify  the  added  complexity  of  the  program. 

The  major  limitation  of  the  program  is  in  the  number  of 
systems  and  controls  choices  available.  It  is  felt  that  the 
options  included  represent  the  most  common  in  practice*  but  it  is 
understood  that  there  are  many  others  which  could  be  included  if 
the  time  allowed.  The  program  is  set  up  to  allow  future  inclusion 
of  additional  capabilities. 

5.3  GOVERNING  EQUATIONS 

As  stated  earlier,  fundamental  enerqy  equations  were 
used  in  the  determination  of  loads  and  associated  variable 
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quantities.  It  is  assumed  that  moist  air  behaves  as  an  ideal  gas 
and  steady  state  conditions  prevail  throughout  the  system.  The 
following  sections  of  this  chapter  describe  the  algorithms  used 
which  are  common  to  all  HVAC  systems  modeled.  System  or  control 
unique  computational  methods  will  be  discussed  in  subsequent 
chapters. 

The  load  across  the  cooling  coil  is  calculated  assuming 
no  work  is  done  on  the  air  through  the  coil  and  that  there  are 
negligible  changes  in  kinetic  and  potential  energy  through  the 
coil.  With  the  above  assumptions*  the  energy  equation  reduces  to 

Qc01t-=m  T*  (  h  ENTER-  h  EXIT-  (  W  enter-  Wei  it)  *h  r)  (  5  ) 

where 

QcoiL=Total  load  on  coil(Btu/hr> 
mr=Total  mass  flow  ratet lbm/hr ) 
heNTER=Enthalpy  of  moist  air  entering  the 
coil<Btu/lbm) 

hex:T=Enthalpy  of  moist  air  exiting  the 
coil (Btu/lbm) 

WeNTER=Humidi ty  ratio  of  moist  air  entering 
the  coiKlbm  of  1-tO/lbm  of  dry  air) 

WtxiT=Humidity  ratio  of  moist  air  exiting 
the  coiKlbm  of  hWO/lbm  of  dry  air) 
hr=Enthalpy  of  saturated  HsO  at  the  leaving 
coil  dry  bulb  temperature* Btu/lbm) 

Note  in  the  above  equation  that  Qcon.  is  defined  as  being  positive 
for  cooling  loads  and  negative  for  heating  loads.  Also»  note  that 
all  humility  ratios  will  be  expressed  in  units  of  pounds  mass  of 
water  per  pound  mass  of  dry  air.  The  last  term  on  the  right  hand 
side  of  the  equation  (i.e.  (Wenter-Weut) *hF)  results  when  liquid 
water  is  condensed  out  of  the  air  stream.  This  term  is  usually 


appreciably  smaller  than  the  other  terms  and  is  often  neglected. 
It  Mas  however,  included  in  the  analysis  and  did  not  increase  run 
time.  The  equation  for  lv  was  developed  from  data  contained  in 
the  ASHRAE  Handbook  of  Fundamentals  using  a  curve  fitting 
program. [73  The  temperature  range  of  application  used  for  this 
value  was  45°F-110DF. 

For  the  enthalpy  terms  (i.e.  h enter  and  hem)*  Equation 
(3)  was  used  to  account  for  the  sensible  and  latent  components  of 
the  coil  load.  To  determine  these  enthalpy  values,  the  air 
mixture  dry  bulb  temperature  and  humidity  ratio  needed  to  be 
calculated.  Downstream  of  the  coil,  the  temperature  condition  was 
set  by  the  control  method  chosen  by  the  user.  It  was  either  fixed 
by  input  or  calculated  based  on  space  and  associated  system  loads. 
The  exiting  humidity  ratio  was  fixed  either  by  the  assumed  maximum 
relative  humidity  exiting  the  coil,  as  input  by  the  user,  or  the 
entering  coil  conditions  and  the  temperature  of  the  air  leaving 
the  coil. 

On  the  entering  side  of  the  coil,  the  mixed  air 
temperature  and  mixed  air  humidity  ratio  were  calculated  based  on 
mass  averages  of  return  and  outside  air.  Temperature  and  humidity 
values  varied  considerably  due  to  economizer  operation.  The 
following  mass  balance  equation  was  used  to  obtain  the  entering  or 
mixed  air  temperature: 

Tm  *=  (  1  — PTOA )  *T  **  (  V„i  j/ V,)  +PT0A*T  on*  (v„,k/Voa)  ( 6 ) 

In  this  equation,  PTOA  is  defined  as  the  ratio  of  outside  air 
volumetric  flow  (CFM)  to  total  or  mixed  air  volumetric  flow  (CFM). 
The  appropriate  specific  volumes  were  then  used  to  convert 
volumetric  flow  rates  to  mass  flow  rates.  The  exact  same  method 
was  used  for  the  calculation  of  the  entering  or  mixed  humidit/ 
ratio  (Whi*).  Iteration  was  required  as  the  specific  volume,  vm«, 
term  is  dependent  on  both  T„i,  and  ■ 


5.3.1  Mass  Flow  Rate  Calculations 


The  total  mass  flow  term  in  Equation  (5)  is  defined  as 
the  sum  of  the  mass  flows  required  to  satisfy  each  of  the  zone 
loads  plus  the  flow  which  is  lost  to  the  plenum  due  to  leakage. 
It  is  calculated  as  the  volumetric  flow  divided  by  the  specific 
volume.  The  specific  volume  was  allowed  to  vary  as  both  a 
function  of  the  temperature  and  humidity  ratio  of  the  moist  air. 
The  volumetric  rate  of  air  flow  was  constant  in  any  duct  section 
or  across  the  coil  due  to  the  previous  assumption  of  constant 
velocity.  The  equation  used  for  calculating  specific  volume  as  a 
function  of  the  temperature  and  humidity  ratio  was 

v=0 . 0555 1 1 3* ( T+459 . 7 ) * ( 1.0+1 . 6078*W ) ( f  t3  / 1  bm )  (7) 


This  equation  assumes  standard  atmospheric  conditions.  The 
temperature  term,  T,  is  in  units  of  ‘F.tB] 

3.3.3  Humidity  Ratio  Calculations 

The  zone  humidity  ratios  (Ui>  were  calculated  with  the 
latent  component  of  the  space  load  .  input  by  the  user  and  the 
following  equation  / 


where 


Mi  /  (  fife  76 0 ) 


Wuc=Humidi ty  ratio  leaving  coil 
QLz=Latent  space  load(Btu/hr) 
hFBZ=latent  heat  of  H,Q  at  the  leaving  coil 
temperature (Btu/lbm) 


m*=Required  zone  mass  flow  rate* lbm/min) 
60=time  conversionlhours  to  minutes) 


The  solution  of  this  equation  was  also  iterative  due  the 
dependence  of  mz  on  Wz.  A  curve  fit  equation  was  used  for  hM«j 
from  data  contained  in  [73. 

Under  the  assumption  that  the  air  entering  the  plenum 
mixes  uniformly  both  in  temperature  and  humidity!  a  mass  balance 
was  accomplished  again  to  determine  the  return  air  humidity  ratio. 
The  sum  of  the  contribution  from  each  of  the  zones  was  added  to 
the  amount  of  air  which  entered  the  plenum  due  to  duct  leakage. 
The  conditions  of  the  leakage  air  were  considered  to  be  the  same 
as  the  conditions  of  the  air  leaving  the  supply  fan.  The  mass 
balance  equation  needed  to  be  manipulated  because  of  the 
dependence  of  the  return  air  specific  volume  on  the  return  air 
humidity  ratio  (see  Equation  (7>).  The  final  form  of  the  equation 
which  was  used  is  as  follows 

W*=SMPLFY / ( 1 . 0- 1 . 607B*SMPLFY )  (9) 

where 

Wp=Return  air  humidity  ratio 
SMPLFY=0 . 0252 1 12*(  T„+459 . 7 )  *  (  [  Z  <  CFMZ*WZ/ vz>  1 
+  ('/.  duct  1oss)*CFCV.ct*K.c/vLc  )  /CFhV 
T*=Return  air  temperature ( W ) 

CFft=Zone  volumetric  flow  rate(ft3/min) 

CFrVcT=Total  volumetric  flow  rate  leaving  the 
coil  prior  to  duct  leakage(f t3/min) 

CFfV=Total  return  volumetric  flow  rate 
including  duct  leakage 

In  the  above  equation!  the  two  volumetric  flow  rates!  CFMlct  and 
CFf^!  are  equal!  but  the  corresponding  mass  flows  are  not.  This 
is  due  the  probable  difference  in  the  leaving  coil  and  return 
specific  volumes!  which  depend  on  temperature  and  water  content. 


Prior  to  the  computation  of  the  mixed  air  humidity 
ratio*  the  outside  air  humidity  ratio  had  to  be  computed.  Using 
the  input  data  for  outside  air  wet  and  dry  bulb  temperatures*  the 
methods  contained  in  the  1985  ASHRAE  Fundamentals  Handbook  were 
followed  to  compute  the  outside  air  humidity  ratio. C81  Curve  fit 
equations  for  the  enthalpy  and  saturated  enthalpy  values  were  used 
instead  of  the  approximate  values  given.  To  compute  the  humidity 
ratio  of  the  air  mixture  leaving  the  coil*  ASHRAE  methods  were 
again  used  with  a  curve  fit  equation  for  the  saturated  humidity 
ratio  obtained  from  data  contained  in  C81  and  the  user  input  of 
assumed  relative  humidity  leaving  the  coil.  All  curve  fit 
equations  are  contained  in  the  program  source  code  of  Appendix  D. 
The  information  on  relative  humidity  needed  to  use  these  equations 
was  obtained  from  the  user  input  data. 


8.3.3  Duct  Temperature  Chanqe  Calculations 


Two  main  factors  cause  the  temperature  of  the  supply  air 
to  change  from  the  exit  of  the  coils  to  the  point  at  which  it  is 
delivered  to  the  space.  The  first  of  these  is  the  heat  gained 
from  or  lost  to  the  plenum  and  the  second  is  the  heat  gained  due 
to  the  supply  fan.  Therefore,  the  temperature  of  the  air  mixture 
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ATTo=Supply  air  dry  bulb  temperature  change 
due  to  heat  loss/gain  in  trunk  duct(°F) 

AT»D=Supply  air  dry  bulb  temperature  change 
due  to  heat  loss/gain  in  branch  duct(°F) 

In  equation  (10),  the  ATtd  term  is  the  sum  of  all  the  changes  in 
trunk  duct  sections  upstream  of  the  particular  zone  branch.  These 
duct  section  temperature  changes  are  described  below. 

Plenum  to  duct  section  heat  transfer 

As  the  air  mixture  flows  through  the  supply  duct  system 
to  the  zone,  it  is  heated  or  cooled  due  to  the  temperature 
difference  between  the  supplied  air  and  the  plenum.  Using  the 
methods  contained  in  till,  with  the  approximation  that  A^  is  equal 
to  the  temperature  difference  between  the  plenum  air  and  the 
supply  air  in  the  duct  at  any  point  along  the  duct 

dQ=mr*Cpri*d  (AT>=Ud*AT*cIAb  (11) 

where 

dQ=Heat  transfer  to  or  from  the  duct(Btu/hr) 
Uo=Effective  duct  ”U"  value(Btu/hr-f  t8-1^) 
dAs=Differential  surface  arealft8) 
d<AT)=Differential  change  in  temperature  in  the 
duct  <  °F ) 

CpH=Spec if ic  heat  of  the  air  mixture 
(Btu/lbm-°F) 

Separating  the  variables  and  carrying  out  the  integration  yields  a 
temperature  in  the  duct  which  varies  exponentially.  In  an  effort 
to  further  reduce  the  computational  time  of  the  simulation,  the 
change  in  the  temperature  of  the  air  in  the  duct  for  a  section  of 


the  supply  duct  was  approximated  as  ATd.  The  temperature 
difference  between  the  plenum  and  the  air  mixture  in  the  supply 
duct  was  approximated  as  being  the  plenum  air  temperature  minus 
the  initial  duct  section  air  temperature  minus  half  ATd. 
Therefore,  the  overall  heat  transfer  was  approximated  as 

Q=m*c  p„*AT r=UB*A,*  <  T  PL-  ( T  0+AT  d/2  > )  (12) 

where 

TpL=Air  temperature  in  the  plenum*  T) 

T0=Initial  duct  section  temperature*  *F) 

Using  Equation  (12)  for  the  determination  of  ATd  produces  accurate 
results,  within  IV.  of  those  found  by  using  Equation  (11),  except 
for  very  long  duct  sections  (greater  than  approx.  600  ft.)  or  very 
small  flow  rates  (less  than  40  f t3/min) .  For  flow  rates  and  duct 
sections  usually  encountered  in  practice,  the  difference  was  found 
to  be  on  the  order  of  0.1*/.. 

The  estimated  length  of  branch  and  trunk  duct  runs  is 
input  by  the  user.  For  the  determination  of  the  rise  or  fall  of 
temperature  in  the  trunk  duct,  a  section  is  defined  as  the  length 
of  duct  from  the  exit  of  the  supply  fan  to  the  first  zone  branch 
or  the  distance  between  zone  branches.  A  branch  duct  section  is 
defined  as  the  length  of  duct  between  the  trunk  duct  and  the  point 
of  entry  into  the  zone  of  the  supply  air.  The  branch  duct  section 
can  be  approximated  as  the  distance  to  the  reheat  coil  or  VAV  box, 
if  one  is  used  in  the  system  simulated.  If  multiple  branch  ducts 
are  present  for  a  particular  zone,  only  the  longest  one  should  be 
input  as  will  be  described  later  in  the  DATA  INPUT  section  of 
Appendix  C. 


Fan  heat  transfer 


The  second  manner  in  which  heat  is  transferred  to  the 
air  stream  in  the  duct  is  through  the  supply  fan.  For  the 
constant  volume  systems  modeled,  the  cycling  and  terminal  reheat 
systems,  the  temperature  rise  due  to  the  fan  was  considered  a 
constant  value  whenever  the  system  was  operating.  For  the  VAV 
system,  part  load  factors  were  used  and  will  be  discussed  in  the 
section  on  FAN  CONTROLS  in  Chapter  3. 

For  fans  operating  at  the  design  point,  the  fan 
horsepower  is  given  by 

Fan  HP=CFMp*P,/<rv*6350)  (13) 


where 

CFMr=Volumetr ic  flow  across  fan(ft3/min) 

PT=Total  pressure< inches  of  wg) 
rv=Fan  efficiency 

6350=Conversion  factor < ft’*inches  of  wg/min-hp) 

The  fan  horsepower  is  divided  by  the  motor  efficiency  to  obtain 
the  motor  horsepower.  To  calculate  the  temperature  rise  of  the 
air  mixture,  the  methods  of  C33  were  followed  and  equation  (14) 
below  was  used. 

&T8F=(Fan  HP)*2545/(nx*mT*cF„)  (14) 


where 


n*=Motor  efficiency 
2545=Conversion  factor (Btu/hr-hp) 


The  program  developed  also  allows  for  the  case  where  the  motor  is 
not  contained  within  the  air  stream.  In  this  case,  the  program 
simply  sets  the  value  of  the  motor  efficiency  to  1.0. 
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The  program  assumes  the  use  of  a  supply  fan  and  will  not 
allow  the  user  to  opt  otherwise.  On  the  other  hand*  it  does  allow 
the  user  the  option  of  whether  or  not  a  return  fan  is  employed. 
If  a  return  fan  is  used*  the  temperature  rise  in  the  return  air 
mixture  due  to  the  return  fan  is  calculated  in  the  exact  same 
manner . 


5.3.4  Plenum  Temperature  Calculations 

As  mentioned  earlier  in  the  section  ASSUMPTIONS*  heat 
transfer  into  or  out  of  the  plenum  was  allowed  to  occur  from  many 
different  sources.  The  predominant  source  is  the  air  returning 
from  each  zone.  Additionally*  the  air  leaked  from  the  supply  duct 
system,  transmission  through  the  ceiling  panels  and  supply  duct 
system,  a  fraction  of  the  lighting  energy  and  transmission  through 
the  exterior  envelope  are  included. 

The  contributions  from  the  individual  zones  and  the 
leaked  supply  air  are  determined  by  the  rate  at  which  the  air 
enters  the  plenum,  its  specific  heat  and  its  temperature.  The 
lighting  energy  and  the  fraction  which  enters  the  plenum  are  both 
input  by  the  user.  The  heat  contribution  to  the  plenum  is  simply 
the  lighting  energy  multiplied  by  the  fraction  entering  the 
plenum.  Thus*  the  user  has  the  ability  to  allow  no  lighting 
energy  to  enter  the  plenum  directly.  The  user  must  take  care  in 
the  input  of  lighting  energy  because  the  program  assumes  that  the 
sensible  space  load  input  includes,  in  part,  a  lighting  energy 
component.  This  component  is*  of  course,  the  fraction  of  lighting 
energy  which  is  not  directly  released  into  the  plenum. 

Heat  is  transferred  to  or  from  the  plenum  through  the 
zone  ceiling  panels  using  the  equation 

Qc=Uc*  Z<A1*(TpL-Ti)  )  (15) 
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where 

Qc=Heat  transferred  through  the  cei 1 ing(Btu/hr ) 
Ue=Effective  ceiling  "U"  value  (Btu/hr-ftE-'F ) 
Aj=Zone  area(ftB) 


T*=Zone  temperature ( °F) 


A  limitation  to  the  program  is  that  only  one  effective  "U"  value 
is  allowed  for  all  the  ceiling  area  in  the  facility  simulated.  If 
various  ceiling  "U"  values  are  present  in  the  facility,  it  is 
recommended  the  user  take  a  weighted  average  value,  based  on  the 
products  of  zone  areas  and  changes  in  temperatures  between  the 
zone  set  point  and  the  plenum. 

To  determine  the  total  heat  transfer  contributed  by 
transmission  through  the  duct  system,  Equation  (12)  was  used  on 
each  section  of  duct.  Then,  the  results  were  summed  and  added  to 
the  overall  plenum  temperature  equation. 

The  final  component  of  heat  gain  or  loss  to  the  plenum 
is  the  contribution  from  the  environment  through  the  exterior 
envelope.  The  user  inputs  this  value  based  on  an  assumed  plenum 
temperature,  which  is  also  an  input  or  can  be  defaulted  to  a  value 
of  B1.0aF.  Inputting  this  load  as  a  function  of  an  assumed  plenum 
temperature  allows  the  calculation  of  the  load  based  on  an  actual 
plenum  temperature  calculated  by  the  program.  The  load  is 
calculated  using 

Qpi#=Qpt««*  (  T oa_T pl)  /  ( T  o*-T  pla)  (16) 


where 

Qp*=Actual  plenum  wall  load(Btu/hr) 
OpwA=Plenum  wall  load  based  on  assumed  plenum 
temperature(Btu/hr ) 

TptA=Assumed  plenum  temperaturet  °F ) 


The  accuracy  of  this  method  depends  to  a  large  degree  on  the 
closeness  of  the  initial  assumed  plenum  temperature  estimate. 
Small  changes  in  calculated  plenum  temperatures  from  the  assumed 
value  will  result  in  only  negligible  errors  in  this  load  and  even 
less  error  in  the  iterated  calculation  of  a  new  plenum 
temperature.  The  primary  error  here  is  the  assumption  that  the 
load  to  the  plenum  from  the  outside  is  instantaneous.  That  is  to 
say»  there  is  no  thermal  capacitance  in  the  exterior  wall. 
However,  as  the  environment  load  is  small  relative  to  other  plenum 
loads,  it  did  not  seem  worthwhile  to  require  dynamic  calculation. 

For  systems  simulations  which  do  not  include  the  use  of 
a  return  fan,  the  plenum  and  return  air  temperatures  are 
synonymous.  If  a  return  fan  is  used,  the  return  air  temperature 
is  simply  the  change  in  temperature  across  the  return  fan  added  to 
the  plenum  temperature. 

£.3.5  Supply  Air  Temperature  Calculations 

To  satisfy  the  sensible  portion  of  the  load  in  each 
space,  air  must  be  supplied  to  the  zone  at  a  specific  dry  bulb 
temperature.  This  is  the  case,  no  matter  which  HVAC  system  or 
controls  strategy  is  employed.  Since  each  zone  will  have  a 
different  sensible  load,  and  thus  require  a  different  supply  air 
temperature,  the  required  temperature  for  each  zone  must  be 
calculated.  The  sensible  load  is  input  by  the  user  and  is  used  in 
the  following  equation  to  determine  the  required  supply 
temperature. 


T  **=T  z~  Q*a*v„»/  <CFMz*cm*60>  (17) 

where 


T**=Required  zone  supply  air  temperature(  °F ) 
Qza=Zone  sensible  load(Btu/hr) 


v*a=Required  supply  air  specific  volume( f t’/lbm) 


The  difference  between  the  required  supply  air  temperature  and  the 
actual  supply  air  temperature  must  either  be  made  up  by  reheating 
the  air  (explained  below  in  the  section  ZONE  REHEAT  CALCULATIONS) 
or  by  changing  the  temperature  of  the  air  coming  off  the  coils. 
Note  also*  that  the  Qg2  term  is  defined  as  being  a  positive 
quantity  for  cooling  loads  and  a  negative  quantity  for  heating 
loads.  Therefore*  as  would  be  expected*  a  lower  than  space  set 
point  air  temperature  is  required  for  spaces  exhibiting  a  cooling 
load  and  vice  versa. 

£.3.6  Zone  Reheat  Calculations 

Some  HVAC  systems  or  controls  strategies  used  dictate 
that  the  temperature  coming  off  the  coils  must  remain  fixed  or 
that  the  temperature  be  set  based  on  a  controlling  zone.  In  these 
cases*  the  temperature  of  the  air  being  supplied  to  some  zones  and 
the  air  mixture  temperature  required  to  satisfy  these  spaces’ 
sensible  load  are  different.  If  the  temperature  is  higher  than 
what  is  required,  a  decision  must  be  made  to  either  lower  the  air 
temperature  coming  off  the  coils,  increase  the  volume  of  air 
entering  the  space,  or  to  allow  the  space  air  temperature  to  rise 
above  the  zone  set  point  temperature  and  thus,  not  satisfy  comfort 
criteria.  On  the  other  hand,  if  the  air  mixture  temperature  being 
supplied  is  lower  than  what  is  required  to  satisfy  the  space  load, 
the  temperature  coming  off  the  coils  cannot  usually  be  raised 
because  the  set  point  is  being  dictated  by  the  needs  of  another 
zone.  Here,  either  the  HVAC  system  must  be  shut  off,  which  is  the 
case  in  the  cycling  system  modeled,  or  some  type  of  supply  air 
reheat  must  be  used  so  the  zone  temperature  does  not  fall 
appreciably  below  the  zone  set  point. 
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For  constant  volume*  non-cycling  systems*  reheating  is 
accomplished  by  raising  the  temperature  of  the  primary  air 
supplied  to  the  required  supply  air  temperature.  This  is  done 
with  the  use  of  a  reheater  which  is  usually  located  near  the  zone 
and  services  only  one  particular  zone.  Only  heating  is 
accomplished  in  the  systems  modeled;  there  is  no  provision  for 
humidification.  The  equation  used  to  calculate  the  energy 
required  to  reheat  the  air  stream  is 

Q«hi=60'*CFMj  *Cpa*  <  Tzr-Tzbup  )  /  Vg  (18) 


where 

Q*Hz=Zone  reheat  load(Btu/hr) 
v8=Supply  air  specific  volume(ft3/lbm) 

The  zone  reheat  should  always  be  a  positive  quantity.  If  the 
program  output  shows  a  negative  zone  reheat  load*  it  means  the 
temperature  of  the  supply  air  is  too  high  and  there  is  no  other 
way  (i.e  lowering  the  leaving  coil  air  temperature  or  increasing 
the  volumetric  flow)  the  program  can  satisfy  the  cooling  load.  In 
this  case,  the  user  can  make  the  decision  whether  to  reduce  the 
temperature  of  the  air  mixture  coming  off  the  coils  or  to  allow 
the  temperature  in  the  zone  to  rise  above  the  zone  set  point 
temperature. 

|  In  the  VAV  system  modeled,  the  air  exhausted  from  the 

zone  can  be  reused  and  even  reheated  if  necessary.  Reheating 
supply  air  or  changing  its  temperature  off  the  coils  may  not 
always  be  necessary  because  the  C  term  is  allowed  to  increase 
or  decrease  between  maximum  and  minimum  values  input  to  satisfy 
the  load.  In  some  cases*  the  primary  air  cannot  be  reduced  enough 
and  the  temperature  of  the  supply  air  must  be  changed.  The 
particular  VAV  system  modeled  in  this  research  is  a  system 
equipped  with  the  ability  to  reuse  zone  return  air  for  reheating 
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the  zone.  If  the  temperature  of  the  air  being  supplied  is  too 
cool  and  the  volume  of  air  reaching  the  zone  is  already  at  the 
minimum  value  required  for  ventilation,  some  of  the  air  normally 
exhausted  to  the  plenum  is  reused  to  warm  the  supply  air  with  the 


use  of  inductors.  These  inductors  also  have  a  limited  flow  rate. 


This  is  due  to  either  the  physical  size  constraints  or  because  of 


the  probable  increased  maintenance  considerations  of  a  large 


inductor  fan  and  motor.  Therefore,  when  the  maximum  amount  of 


return  air  is  reused  and  the  load  is  still  not  satisfied,  the 


reused  air  is  reheated  and  mixed  with  the  primary  supply  air  to 


reach  the  desired  temperature. 


CHAPTER 


SYSTEMS  AND  CONTROLS 


3.1  HVAC  SYSTEMS 

The  constant  volume  Terminal  Reheat  system,  Variable  Air 
Volume  system  with  Induction  Type  Reheating,  and  a  Cycling  system 
were  chosen  as  the  systems  to  be  modeled  for  this  research.  These 

three  systems  were  selected  to  provide  the  user  with  a  choice  of 

systems  that  can  be  energy  efficient  in  the  design  of  new 

facilities  or  which  are  in  wide  use  in  existing  facilities.  Of 
course,  with  the  plethora  of  systems  and  subsystems  used  in 

practice  today,  arguments  could  be  voiced  for  virtually  any 
system.  Therefore,  the  final  decision  came  down  to  choosing  three 
systems  which  were  completely  different  in  concept  and  which  would 
not  generally  be  used  for  the  same  facility.  The  user  would  then 
be  able  to  see  the  variation  in  coil  loads  for  the  same  basic 
space  loads  in  the  same  geographic  location.  Additionally, 
because  these  three  systems  were  all  single  duct  systems,  many  of 
the  same  or  similar  equations  and  programming  logic  could  be 
employed  in  the  program.  This  allowed  for  minimal  computational 
redundancy  and  thus,  reduced  time  to  obtain  results. 

3.1.1  Terminal  Reheat  System 

The  constant  volume  HVAC  system  modeled  is  shown  in 
Figure  3.1.  The  system  has  the  ability  to  service  one  to  fifty 
separate  zones.  Each  zone  has  its  own  space  sensible  and  latent 
loads,  set  point  temperature,  air  flow  rate  and  lighting  energy. 
Additionally,  each  zone  is  equipped  with  a  zone  reheater  which 
will  reheat  the  entire  primary  air  supply  to  the  temperature 
I 
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Terminal  Reheat  System 


required  to  satisfy  the  total  space  load.  It  is  assumed  that  the 
reheaters,  as  with  all  equipment*  can  handle  any  load  which  may 
arise  during  the  twenty-four  hour  period  of  simulation.  The 
system  includes  a  set  of  cooling  coils*  a  preheater*  and  a  supply 
fan.  It  was  assumed  that  either  the  cooling  coils  or  the 
preheater  would  work  to  condition  the  mixed  air  entering,  but  not 
both  simultaneously.  No  ability  to  humidify  the  air  was  included. 
The  speed  of  the  supply  fan  and  the  volume  of  air  it  was  moving 
were  considered  constant.  Of  course,  if  the  loads  or  schedule 
dictated  the  system  be  shut  off,  the  supply  fan  could  also  be  shut 
off . 

Since  the  user  inputs  the  volume  of  air  which  is  being 
supplied  to  each  zone,  and  thus  the  total  volume  entering  the  fan, 
the  fan  could  be  used  as  a  dual  speed  fan  which  sets  one  speed  for 
winter  (heating)  operation  and  one  speed  for  summer  (cooling) 
operation.  Additionally,  the  system  was  set  up  to  allow  for  the 
option  of  using  a  return  fan,  an  economizer,  or  both.  All  the 
controls  strategies  described  below  in  the  section  CONTROLS 
STRATEGIES  were  applicable  to  this  system.  The  air  exhausted  from 
each  zone  was  modeled  as  returning  through  a  ceiling  plenum. 

3.1.S  Variable  Air  Volume(VAV)  System 

The  VAV  System  modeled  (Figure  3.2),  like  the  Terminal 
Reheat  System,  has  the  ability  to  service  up  to  fifty  separate 
zones.  Again,  each  zone  could  have  different  sensible  and  latent 
space  loads,  set  point  temperatures,  air  flow  rates  and  lighting 
energies.  The  difference  in  input  arises  from  the  fact  that  the 
volume  of  air  which  can  be  supplied  to  each  zone  is  variable. 
Therefore,  the  user  inputs  both  a  minimum  and  maximum  value  for 
volumetric  flow  into  each  zone.  The  maximum  value  must  remain 
constant  for  the  entire  period  of  simulation,  but  the  minimum  is 
allowed  to  vary  based  on  ventilation  and  occupancy  schedules. 
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Preheater  Cooling  Coil 


With  this  system,  the  space  load  can  be  satisfied  one  of 
four  ways.  The  temperature  of  the  air  mixture  coming  off  the 
coils,  the  primary  air  volume  being  supplied  to  the  zone  and  the 
secondary  or  induced  air  volume  can  all  be  changed.  Additionally, 
the  secondary  air  can  be  reheated.  This  is  accomplished  in  the 
following  manner.  First,  the  temperature  of  the  air  mixture  is 
set  by  the  particular  control  method  chosen  with  the  maximum 
volumetric  flow  rates.  If  the  program  determines  that  the  zone 
will  be  over-cooled,  it  reduces  the  volume  of  primary  air  supplied 
until  the  load  is  matched.  When  the  volume  or  primary  air  has 
been  reduced  to  the  minimum  value  and  the  zone  still  is 
experiencing  ovei — cooling,  the  program  sets  the  primary  air  to  its 
minimum  value  and  begins  to  mix  induced  air  until  this  mixed  air 
temperature  is  equal  to  the  required  zone  supply  air  temperature. 
In  some  cases,  the  maximum  amount  of  induced  air  will  be  used  and 
the  resulting  air  mixture  will  still  be  too  cold.  Here,  the 
program  sets  the  volume  of  induced  air  to  the  maximum  and  then 
heats  it  so  when  it  is  mixed  with  the  primary  air,  previously  set 
to  its  minimum  value,  the  resulting  mixed  air  temperature  is  equal 
to  the  required  zone  supply  air  temperature. 

The  VAV  system  is  equipped  with  a  set  of  cooling  coils 
and  a  preheater,  which  cannot  be  run  simultaneously.  An  optional 
economizer  and  return  fan  are  also  included  in  the  model.  The 
difference  between  the  fan  control  for  constant  volume  systems  and 
the  VAV  system  is  that  the  volume  of  air  which  is  passing  through 
the  supply  and  return  fans  can  be  varied.  Because  the  user  has  to 
have  knowledge  of  minimum  flow  rates  for  each  zone,  it  was  assumed 
that  the  fan  used  could  handle  both  the  minimum  and  maximum  total 
flows  input.  With  this  in  mind,  no  fixed  minimum  flow  rate 
through  the  fan  was  identified  and  no  default  value  included.  Fan 
control  methods  for  the  VAV  system  are  described  in  the  section 
FAN  CONTROLS. 
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As  mentioned  above,  this  system  can  reheat  a  portion  of 
the  zone  return  air  and  mix  it  with  the  primary  supply  air  to 
provide  the  correct  air  mixture  temperature  which  will  satisfy  the 
space  loads.  This  is  accomplished  with  the  use  of  a  fan  and  motor 
set  near  the  zone.  This  equipment  can  only  recirculate  a  fixed 
amount  of  the  return  air  back  into  the  zone.  Size,  noise, 
maintenance  and  comfort  all  have  to  be  considered  when  selecting 
the  size  of  this  equipment.  The  maximum  flow  rate  through  this 
equipment  will  be  needed  as  input  to  the  simulation  program. 


3.1.3  Cycling  System 


The  Cycling  System  modeled  (Figure  3.3)  is  different 
from  the  other  two  in  three  main  ways.  First,  the  system  is 
designed  to  be  able  to  shut  down  many  times  within  an  hour  if  the 
loads  so  dictate.  Of  course,  when  it  is  running,  it  does  so  at 
constant  volume  of  air  mixture  to  the  zone.  The  second  main 
difference  is  that  the  system  modeled  can  only  service  one  zone. 
Without  a  complex  duct  and  damper  system  and  a  sophisticated 
controls  system,  the  loads  in  many  of  the  zones  would  have  a  good 
chance  of  being  under-satisfied,  over-satisfied,  or  even  under¬ 
and  ovei — satisfied  in  the  same  hour.  The  third  difference  occurs 
because  of  the  concept  of  the  system.  Since  it  cycles  on  and  off 
so  as  to  exactly  meet  the  load,  there  is  no  need  for  reheating  the 
supply  air.  As  with  the  other  two  HVAC  systems  modeled,  the 
cycling  system  has  the  ability  to  use  all  the  economizer  options 
and  controls  strategies.  It  also  employs  the  same  zone  specific 
input  data  as  the  terminal  reheat  system. 
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3.2  CONTROLS  STRATEGIES 

Most,  if  not  all,  facilities  which  employ  a  central  HVAC 
system  to  provide  either  comfort  or  process  heating  and  cooling 
are  equipped  with  some  type  of  controls  scheme.  Some  schemes  may 


f 


Cycling  System 


be  as  simple  as  fixing  the  dry  bulb  air  mixture  temperature 
exiting  the  coils  to  some  minimum  temperature  as  prescribed  by  the 
peak  design  loading.  Others  may  be  much  more  complex*  providing 
for  tight  control  for  both  humidity  and  temperature  and  for 
differing  schedules.  Additionally*  in  the  interest  of  energy 
efficiency*  some  facilities  may  be  designed  with  multiple  HVAC 
systems  servicing  only  portions  of  the  facility*  each  with  its  own 
control  strategy.  For  the  purposes  of  this  research,  three  of  the 
more  common  controls  strategies  used  to  set  the  temperature  Df  the 
air  mixture  leaving  the  coils  were  chosen  to  model.  These 
included  the  fixed  set  point  method,  the  zone  controlled  method 
and  the  outside  air  controlled  method  and  are  described  below. 

3.5.1  Fixed  Set  Point  Control  Method 


The  fixed  set  point  control  method  allows  the 
temperature  of  the  air  mixture  exiting  the  coils  to  be  set  to  any 
constant  temperature  as  determined  by  the  design  Dr  facility 
engineer.  The  set  point  may  be  chosen  based  on  the  design 
engineer’s  calculation  of  the  peak  loading.  Though  this  method 
may  be  the  best  way  to  ensure  that  all  loads  are  satisfied  all  the 
time,  it  is  also  may  provide  for  the  most  wasted  reheat  and 
cooling  energy. 

The  set  point  may  also  be  chosen  based  on  the  facility 
engineer’s  experience  with  both  the  facility’s  occupancy  and 
equipment  schedule  and  the  weather  patterns  of  the  particular 
geographic  location.  In  the  latter  case,  the  set  point  may  be 
changed  seasonally,  monthly  or  even  more  frequently.  This  control 
method  model  works  the  same  way  for  all  three  HVAC  systems 
modeled . 

It  was  not  the  objective  of  this  research  to  make 
decisions  on  how  or  how  often  to  employ  the  controls  strategies 
modeled.  Therefore;  the  fixed  set  point  control  method  modeled 


allows  the  set  point  to  be  varied  each  twenty  four  hour 
simulation.  No  default  set  point  value  was  included  in  the 
program  because ,  though  many  systems  are  designed  to  operate  in 
the  range  of  55^  for  the  exiting  air  mixture  temperature  in  the 
cooling  mode*  each  situation  is  different  and  should  be  the 
decision  of  the  user. 

With  the  use  of  a  fixed  set  point  control  method,  no 
matter  what  logic  goes  into  the  set  point  decision,  there  is 
always  the  chance  of  setting  the  exiting  temperature  either  too 
high  or  too  low.  The  program,  as  written,  has  no  provisions  for 
checking  to  see  if  the  set  point  chosen  is  optimal  or  for 
suggesting  a  better  one.  It  was  not  possible  to  include  such  a 
check,  due  to  the  fact  that  the  program  is  only  a  one  day 
simulation  and  a  recommendation  based  on  only  a  twenty-four  period 
may  not  reflect  what  is  actually  required  for  year  round  or 
seasonal  operation.  A  quick  check  to  see  if  the  temperature 
chosen  is  too  high  to  satisfy  the  individual  zone  cooling  loads 
can  be  accomplished,  though,  because  of  the  sign  convention  used 
in  the  calculation  of  zone  reheat.  A  negative  zone  reheat 
encountered  in  the  output  to  the  program  shows  that  the  load  in 
the  particular  zone  will  not  be  satisfied  during  the  entire  hour 
and  that  the  zone  set  point  temperature  input  will  probably  not  be 
maintained. 

3.S.S  Zone  Controlled  Method 

The  second  controls  strategy  modeled  uses  the  zone  with 
the  load  requiring  the  lowest  leaving  coil  temperature  as  the 
controlling  zone.  It  sets  the  hourly  coil  leaving  temperature 
based  on  this  zone.  The  model  works  differently  for  each  system 
modeled . 

For  the  constant  volume  Terminal  Reheat  system,  once  the 
temperature  has  been  determined  based  on  the  controlling  zone,  the 


air  temperature  being  supplied  to  each  zone  is  then  calculated 
based  on  duct  losses.  Since  the  coil  leaving  air  temperature  is 
determined  based  on  the  controlling  2one>  there  is  no  reheat  load 
associated  with  that  zone.  The  reheat  load  for  the  remaining 
2ones,  if  any,  is  calculated  using  the  method  described  in  the 
section  ZONE  REHEAT  CALCULATIONS.  There  is  an  exception  to  this 
procedure.  The  program  has  a  maximum  default  leaving  coil 
temperature  of  68°F,  if  any  of  the  zones  is  calling  for  cooling. 
If  the  program  determines  that  the  required  leaving  coil 
temperature  is  greater  than  this  default  value,  it  will  set  the 
temperature  to  this  maximum  value.  All  zones  will  then  require 
some  amount  of  reheat  energy,  even  the  controlling  zone. 

In  the  case  of  the  VAV  system,  the  program  initially 
sets  the  volumetric  flow  for  each  zone  to  it  maximum.  The 
required  zone  air  supply  temperature  is  then  calculated  as 
described  in  the  section  SUPPLY  AIR  TEMPERATURE  CALCULATIONS  of 
Chapter  2  and  the  controlling  zone  identified.  This  ensures  that 
the  highest  coil  exiting  air  temperature  will  be  selected  which 
still  satisfies  all  the  zone  loads  for  the  particular  hour 
simulated.  If  the  overall  facility  load  is  a  heating  load,  it 
will  ensure  that  the  lowest  temperature  is  selected.  Once  the 
temperature  is  selected,  the  volumetric  flow  for  the  controlling 
zone  is  kept  set  at  its  maximum  and  the  volumetric  flows  for  the 
remaining  zone  are  calculated.  Since  the  total  air  volume  will 
probably  be  reduced  in  this  step,  the  intermediate  values  of 
plenum  and  duct  section  temperatures  are  recalculated.  A  new 
leaving  coil  temperature  is  then  calculated,  based  on  this  new 
reduced  air  volume.  Finally,  the  volume  of  induced  air  and 
possible  reheat  load  for  the  remaining  zones  is  computed.  As  with 
the  Terminal  Reheat  system,  there  is  one  exception  to  this 
procedure.  When  the  maximum  allowable  leaving  coil  temperature  is 


reached,  the  volumetric  flow  to  each  zone  is  reduced,  even  in  the 
controlling  zone. 


When  this  control  method  is  used  with  the  cycling 
system,  the  exiting  coil  temperature  is  calculated  based  on  being 
able  to  exactly  satisfy  the  hourly  load.  Because  of  this 
matching,  the  system  must  run  the  entire  hour  to  satisfy  the  load. 
In  essence,  it  resembles  a  single  zone,  constant  volume  Terminal 
Reheat  system  with  no  reheat  energy  required.  Though  in  practice 
the  Cycling  system  is  not  used  with  this  type  of  control  method, 
the  simulation  may  provide  some  insight  into  the  fixed  temperature 
which  should  be  selected.  Since  this  system  is  modeled  as  a 
single  zone  system,  when  the  maximum  allowable  leaving  coil 
temperature  is  reached  the  only  way  the  system  can  balance  the 
load  is  to  shut  down.  In  this  case,  this  control  method  behaves 
like  the  fixed  set  point  method. 

The  maximum  allowable  leaving  coil  temperature  was 
included  as  a  default  value  in  the  program.  This  value  can  be 
changed  by  the  user  if  latent  load  control  is  not  critical.  When 
the  value  is  set  too  low,  the  zone  controlled  method  will  behave 
like  a  fixed  set  point  method  during  most  hours. 

3.E.3  Outside  Air  Controlled  Method 

The  outside  air  controlled  method  of  control  sets  the 
leaving  coil  air  temperature  based  on  a  set  temperature  determined 
by  the  user.  The  program,  in  the  subroutine  SETTLCC,  opens  and 
reads  a  permanent  file  which  has  been  previously  set  up.  This 
file  contains  sets  of  outside  air  dry  bulb  temperatures  and 
corresponding  leaving  coil  air  dry  bulb  temperatures.  The  input 
of  data  to  this  file  is  described  in  Appendix  C,  in  the  section 
SYSTEMS/CONTROLS  OPTIONS.  In  reading  the  file,  the  program 
compares  the  hourly  outside  dry  bulb  temperature  being  simulated 
with  all  the  outside  dry  bulb  temperatures  contained  in  the  file. 


When  it  finds  an  outside  temperature  in  the  file  which  is  within 
+0.5°F,  it  then  reads  the  mated  leaving  coil  air  temperature  and 
sets  the  leaving  coil  temperature  for  the  hour  being  simulated  to 
this  value. 

If  no  outside  air  dry  bulb  temperature  within  +0.5°F  can 
be  found  in  the  file,  the  program  will  print  the  message,  "Outside 
air  temperature  encountered  in  hour  X  (i.e.XX.X°F)  is  beyond  the 
range  of  your  control  schedule.  Either  your  control  method  or 
schedule  must  be  changed.",  on  the  screen.  The  required  user 
actions  are  contained  in  Appendix  C. 

It  should  be  noted  that  the  schedule  need  not  be  entered 
prior  to  every  simulation.  The  file  has  the  capability  of  holding 
150  pairs  of  temperature  values.  It  can  be  set  to  hold  all  the 
data  required  by  a  specific  location  or  facility  for  all 
situations.  Though  it  is  expected  that  a  range  of  + ( 1  or  2)°F  for 
the  outside  versus  leaving  coil  temperatures  is  as  tight  as  would 
be  needed,  especially  in  the  cooling  mode,  the  smaller  range  Mas 
included  for  the  special  situations  requiring  such.  It  was  felt 
that,  since  the  file  need  only  be  set  up  once,  the  added  input 
associated  with  the  smaller  AT  would  be  minimal. 

3.3  ECONOMIZER  OPTIONS 

The  concept  of  an  economizer  system  is  to  make  maximum 
use  of  the  ability  to  mix  zone  return  air  and  outside  air  to 
minimize  the  load  on  the  coils.  This  is  accomplished  while 
staying  within  the  prescribed  minimum  levels  of  outside  air 
required  for  ventilation  purposes.  In  some  situations,  the  use  of 
an  economizer  may  actually  allow  the  coils  to  be  shut  down  totally 
and  thus,  the  facility  is  cooled  for  "free".  Economizer  systems 
are  becoming  more  widely  used  in  the  designs  of  new  facilities. 
In  fact,  the  inclusion  of  some  type  of  economizer  system  was 
required  by  ASHRAE  Standard  90A-1980  for  new  commercial  facility 


designs  employing  HVAC  system  larger  than  5,000  cubic  feet  per 
minute.  This  minimum  size  has  been  recommended  to  be  further 
reduced  to  3,000  cubic  feet  per  minute  in  a  proposed  revision  to 
the  standard. C61  The  basic  concept  behind  any  economizer  is  as 
described  above,  but  there  are  different  methods  of  controlling 
the  amount  of  outside  air  which  will  be  mixed  with  the  return  air. 
The  two  common  methods  of  economizer  control,  dry  bulb  temperature 
and  enthalpy,  were  chosen  for  use  in  this  research  and  are 
described  below. 

The  program  also  includes  the  option  to  maintain  the 
percentage  of  outside  air  used  at  a  constant  value,  input  by  the 
user.  This  was  included  because  in  smaller  systems  other  factors, 
like  economics,  may  preclude  the  use  of  an  economizer  system. 
Additionally,  there  are  many  facilities  in  use  today  with  no 
economizer  system  and  exclusion  of  this  option  would  limit  the  use 
of  the  program. 

3.3.1  Temperature  Economizer  Control 


The  control  of  an  economizer  system  using  a  comparison 
of  the  dry  bulb  temperatures  of  the  outside  and  return  air 
mixtures  is  an  efficient  and  usually  economical  means  of 
conserving  facility  HVAC  energy.  With  the  coil  leaving  air 
temperature  fixed  by  load  conditions,  the  load  on  the  coils,  and 
thus  the  energy  used,  is  directly  related  to  the  inlet  conditions. 
Therefore,  if  the  temperature  of  the  mixed  air  entering  the  coils 
is  closer  to  the  exiting  temperature,  the  load  on  the  coils  will 
be  lower.  For  dry  climates  or  where  humidity  is  not  a  factor  this 
is  always  the  case.  This  can  be  seen  by  Equations  (3)  and  (5). 

As  mentioned  earlier,  a  minimum  amount  of  outside  air  is 
usually  required  for  ventilation  purposes.  This  value  is  input  by 
the  user  and  is  based  on  facility  occupancy  schedules  or  other 
environmental  factors.  The  dry  bulb  temperature  controlled 


economizer  modeled  works  by  mixing  the  incoming  air  with  the 
following  instructions.  If  the  outside  air  has  a  dry  bulb 
temperature  greater  than  62.5°F,  the  percentage  of  outside  air 
allowed  is  set  to  the  minimum  level  set  by  the  user.  If  both  the 
outside  air  and  return  air  temperatures  are  higher  than  the 
required  leaving  coil  temperature,  then  the  percentage  of  outside 
air  is  set  to  the  minimum  if  the  outside  air  temperature  is 
greater  than  the  return  air  temperature.  It  is  set  to  a  maximum 
if  the  outside  air  temperature  is  less  than  the  return  air 
temperature  and  less  than  the  maximum  allowable  outside  dry  bulb 
temperature.  There  are  also  many  times  when  the  required  leaving 
coil  temperature  is  between  the  outside  and  return  air 
temperatures.  In  these  cases*  equation  (19)  is  used  to  determine 
the  optimal  mixing  percentage. 

Percent  Outside  Air=  ( T*-Tuc> *100/ ( T  „-T  0»>  (19) 

The  specific  volume  ratios  do  not  come  into  effect  in  this 
equation  because  the  outside  air  percentage  was  defined  as  the 
ratio  of  the  volumetric  flows*  which  do  not  change  with  air 
temperature  or  humidity  ratio. 

The  default  value  of  62.5°F  was  chosen  as  the  maximum 
outside  air  temperature  allowed  because*  if  the  air  were  saturated 
at  this  temperature*  it  would  correspond  to  conditions  in  the 
individual  zones  of  7B°F  and  60’/.  relative  humidity.  The  maximum 
temperature  was  included  in  the  program  as  a  default  value.  If 
latent  load  control  is  not  a  concern,  or  if  the  climate  is 
inherently  dry,  it  can  be  increased  during  input. 

3.3.2  Enthalpy  Economizer  Control 


There  are  many  times  where  humidity  plays  as  important  a 
role  in  the  energy  consumed  by  an  HOAC  system  as  dry  bulb 


temperature  does.  In  these  cases*  as  shown  in  Equation  (5),  the 
difference  in  enthalpy,  both  the  sensible  and  latent  components, 
between  the  entering  and  exiting  air  mixture  controls  the  load  on 
the  coils.  Therefore,  the  energy  consumed  would  be  minimized  if 
the  enthalpy  of  the  air  entering  the  coil  was  as  close  as  possible 
to  the  enthalpy  of  the  air  leaving  the  coil.  This  is  the 
principle  behind  an  enthalpy  controlled  economizer  system.  As  can 
be  seen  by  observing  a  psychrometr ic  chart,  there  are  times  when 
the  enthalpy  controlled  economizer  would  make  a  different  choice 
than  the  dry  bulb  controlled  economizer  on  the  percentage  of 
outside  air  used  by  the  HVAC  system.  These  cases  are  shown 
graphically  in  Figure  3.4.  With  the  leaving  coil  and  return  air 
conditions  depicted  by  A  and  B,  respectively,  the  dry  bulb 
controlled  economizer  would  choose  a  maximum  percentage  of  outside 
air  if  the  outside  dry  bulb  temperature  was  less  than  the  return 
air  dry  bulb  temperature,  T.  This  includes  both  region  W  and 
region  Y.  Conversely,  the  enthalpy  controlled  economizer  would 
choose  to  minimize  the  percentage  if  the  outside  air  condition  was 
in  region  V.  This  is  due  to  the  high  humidity  level  of  the 
outside  air  in  this  region.  The  other  region  where  the  two 
control  differ  is  when  the  outside  air  conditions  are  contained  in 
region  Z.  Here,  the  dry  bulb  controlled  method  would  set  the 
outside  air  percentage  to  a  minimum;  whereas,  the  enthalpy 
controller  would  maximize  the  use  of  outside  air  due  to  its  low 
humidity  level. 

The  enthalpy  controlled  economizer  system  model  makes 
use  of  the  outside  air  dry  and  wet  bulb  temperatures,  which  are 
input  by  the  user,  to  compute  che  enthalpy  of  the  outside  air. 
This  is  accomplished  with  Equation  (3).  The  humidity  ratio,  W,  in 
this  equation  was  calculated  following  the  procedures  described  in 
the  section  HUMIDITY  RATIO  CALCULATIONS.  The  curve  fit  equation 
for  the  humidity  ratio,  saturated  at  the  wet  bulb  temperature,  can 


be  found  in  the  program  source  code  of  Appendix  D.  The  data  used 
in  the  development  of  the  equation  was  taken  from  reference  C83. 
The  enthalpy  of  the  return  air  was  calculated  using  Equation  (9) 
and  the  return  air  temperature. 

Similar  logic  to  the  dry  bulb  temperature  controlled 


economizer  described  above  was  used  for  the  instructions  to  the 


enthalpy  controlled  economizer.  For  example,  in  the  case  where 
the  enthalpy  of  both  the  outside  and  return  air  mixtures  are  above 
the  leaving  coil  enthalpy,  if  the  outside  air  enthalpy  is  greater 
than  that  of  the  return  air,  the  percentage  of  outside  air  used  is 


set  to  the  minimum  value  allowed.  For  the  case  where  the  leaving 


coil  enthalpy  is  between  the  outside  and  return  air  enthalpies, 
Equation  (20)  below  is  used  by  the  program  to  calculate  the 


percentage  of  outside  air  which  will  provide  "free  cooling". 


Percent  Outside  Air=<h*-hLc>*100/ (h*-h0B) 


where 


h*=Return  air  enthalpy(Btu/lbm) 
hLC=Leaving  coil  enthalpy (Btu/lbm) 
h„A=Outside  air  enthalpy(Btu/lbm) 


With  this  control  method,  there  is  no  maximum  enthalpy  level  of 


outside  air  which  causes  the  percentage  of  outside  air  to  be 
reduced.  Use  of  this  method  insures  an  optimum  level  of  mixing. 


Figure  3.5  shows  how  the  enthalpy  controlled  economizer 
performs.  In  region  A,  the  percentage  of  outside  air  remains  at  a 
minimum  value  fixed  by  environmental  constraints.  Region  B, 


describes  the  case  where  the  leaving  coil  enthalpy  is  between  the 


return  and  outside  air  enthalpies.  Here,  the  two  air  conditions 
are  mixed  so  that  the  enthalpy  of  the  resulting  mixture  is  equal 
to  the  leaving  coil  air  enthalpy.  This  is  called  "free-cooling". 
When  the  return  air  enthlapy  is  greater  than  the  outside  air 


enthalpy  and  the  outside  air  enthalpy  is  greater  than  the  exiting 
coil  enthalpy,  the  percentage  of  outside  air  is  set  to  its  maximum 
as  shown  in  region  C.  The  final  case  is  where  the  outside  air 
enthalpy  is  greater  than  the  return  air  enthalpy,  which  is  in  turn 
greater  than  the  leaving  coil  enthalpy.  Here,  the  outside  air  is 
reduced  to  the  minimum  limit  as  shown  in  region  D. 

One  of  the  user  inputs  is  the  assumed  maximum  relative 
humidity  exiting  the  coils.  This  value  should  usually  be  between 
95’/.  and  100’/.,  depending  on  the  type  of  cooling  coil  employed.  If 
the  latent  loads  in  the  facility  are  such  that  the  assumed 
saturation  level  is  not  reached,  the  coils  are  considered  dry. 
This  means  that  the  coils  are  performing  only  sensible  cooling  and 
that  the  humidity  ratio  exiting  the  coils  is  the  same  as  the 
humidity  ratio  entering  the  coils.  In  this  case,  the  enthalpy 
controlled  economizer  is  actually  performing  like  the  dry  bulb 
temperature  controlled  economizer  described  above.  Because  of  the 
sequence  of  operations  in  the  program  code,  namely  that  the  final 
exiting  coil  humidity  ratio  for  dry  coil  operation  is  computed 
after  the  percentage  of  outside  air  has  been  determined,  it  was 
more  efficient  to  use  the  dry  bulb  control  rather  than  iterate  one 
more  t  e. 

3.4  FftN  CONTROL 

The  method  by  which  the  volume  of  air  through  a  fan  is 
controlled  during  part  load  operations  can  drastically  change  the 
associated  temperature  rise  of  the  air.  For  constant  volume 
systems,  like  the  terminal  reheat  and  cycling  systems,  control  is 
not  a  factor  because  the  flow  through  the  fans  is  always  at  or 
very  near  the  design  volume.  The  only  difference  would  be  if  the 
fan  had  a  two  speed  motor  for  summer  and  winter  operations.  In 
this  case,  the  methods  described  in  the  section  FAN  HEAT  TRANSFER 
of  Chapter  £  could  still  be  used  for  both  summer  and  winter 


operation.  The  user  would  be  required  to  know  the  fan  and  motor 
efficiencies  at  both  speeds. 

This  is  not  so  for  the  VAV  system  modeled.  In  this 
system,  the  volume  of  air  changes  every  hour  and  is  usually  not 
near  the  design  point.  Because  of  the  continuous  change  in  air 
volume,  there  has  to  be  some  control  on  how  the  fan  moves  the 
changing  load.  Four  methods  of  control  were  chosen  for  use  in  the 
program.  They  included  a  variable  speed  motor,  the  use  of  inlet 
dampers,  the  use  of  discharge  dampers  and  a  cycling  fan. 

For  off-design  operations,  Equation  (21)  was  used  to 
calculate  the  temperature  rise  of  the  air  mixture  due  to  the  fan. 
(The  method  for  determining  the  temperature  rise  at  the  design  air 
flow  was  described  in  the  section  FAN  HEAT  TRANSFER.) 

ATfan  (OFF-DC81BN)  =  AT,AN.DM,aN>  *FFLP/PLR  ( 21 ) 

where 

PLR=Fan  Part  Load  Ratio(Actual  CFM/Design  cfm) 

FFLP=Fraction  of  Full  Load  Power 
=a+b*PLR+c*PLRE+d*PLR3 

To  use  this  method  for  off-design  fan  performance  and  control,  the 
coefficients  a,  b,  c  and  d  must  be  known  for  the  particular  fan 
control  method  selected. [31  These  coefficients  were  defined  by  a 
curve  fit  of  specific  fan  data.  Rather  than  requiring  the  user  to 
input  these  coefficients  or  spend  a  large  amount  of  time 
developing  them  from  fan  manufacturer’s  data,  it  was  decided  to 
use  the  coefficients  used  in  the  DOE  2. IB  program.  If  these  are 
not  satisfactory,  the  user  has  the  option  of  changing  them.  The 
four  coefficients  for  each  of  the  four  methods  of  control  were 
taken  from  the  DOE  2. IB  energy  prediction  mainframe  program. Cl] 
The  coefficients  are  default  values  and  the  program  allows  for 


change  of  each  of  them  during  its  input  phase.  Specific  values  of 
the  coefficients  can  be  seen  in  the  program  code,  Appendix  D. 

Most  fans  operate  extremely  inefficiently  at  part  load 
ratios  of  less  than  about  20%.  In  the  development  of  the  program, 
it  was  assumed  that,  since  the  user  Mas  required  to  input  both  the 
maximum  and  minimum  total  air  flow  rates,  the  fan  selected  would 
operate  satisfactorily  within  the  limits  specified  by  the  user. 
This  was  assumed  to  allow  for  the  maximum  amount  of  flexibility  in 
equipment  selection,  but  care  should  be  taken  so  as  not  to 
unknowingly  simulate  the  running  of  either  the  supply  or  return 
fan  at  unacceptably  low  flow  rates  because  erroneous  results  may 


CHAPTER  <+ 

PROGRAM  IMPLEMENTATION 

The  next  phase  of  this  work  was  to  develop  the  computer 
code  to  carry  out  the  calculations.  To  fulfill  the  project’s 
primary  objective,  the  code  had  to  be  accomplished  so  as  to  be 
able  to  run  on  a  microcomputer  with  minimal  time  required  for 
results.  It  also  had  to  be  as  simple  to  use  as  possible  and  had 
to  allow  the  greatest  flexibility  for  system  parameter  variation. 
Another  underlying  objective  was  to  structure  the  code  so  that 
additional  systems,  control  strategies,  schedules  and  other 
options  could  be  included  at  a  later  time. 

4.1  HARDWARE /SOFTWARE  USED 

The  IBM  Personal  Computer  AT  was  chosen  as  the 
development  tool.  IBM  equipment  was  selected  to  allow  for  the 
widest  dissemination  of  this  program.  At  the  time  of  this  work, 
it  was  determined  that  the  greatest  percentage  of  microcomputers 
in  use  in  practice  today  were  either  IBM  microcomputers  or 
microcomputers  which  are  compatible  with  the  IBM.  With  the  use  of 
this  microcomputer,  a  single  twenty-four  hour  simulation, 
employing  a  night  time  setback  schedule  with  little  or  no 
nighttime  loads,  required  on  the  average  approximately  fifteen  to 
twenty  seconds  to  produce  results.  No  simulation  accomplished 
during  the  period  of  the  research  ever  took  over  a  minute.  Of 
course,  the  use  of  this  program  with  less  capable  microcomputers 
could  require  much  more  time  to  complete  simulations. 

FORTRAN  77  was  the  programming  language  used  to  write 
the  code  for  this  program.  FORTRAN  77  was  chosen  to  allow 
transport  of  the  program  to  main-frame  equipment  and  to  other 
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microcomputers  with  a  minimum  of  effort.  Also,  since  one  of  the 
objectives  of  this  work  was  to  provide  a  program  which  could  be 
used  by  as  many  people  as  possible,  it  was  felt  that  FORTRAN  77 
was  one  of  the  more  familiar  computer  languages  and  would  allow 
more  users  to  make  the  source  code  changes  which  might  be 
necessary  to  fit  specific  need.  Additionally,  it  was  envisioned 
that  this  program  would  someday  be  linked  together  with  a  space 
load  program,  equipment  component  performance  programs  and 
probably  an  economics  program  in  an  overall  energy  use  program. 
The  use  of  FORTRAN  77  would  facilitate  easier  meshing  of  the 
overall  program  parts  than  some  of  the  other  computer  languages. 

4,5  DATA  INPUT  OPTIONS 

A  significant  amount  of  input  is  required  to  set  up  the 
program  for  an  initial  simulation  run.  Because  of  this  and 
because  it  is  assumed  that  inexperienced  users  may  be  making  the 
inputs,  great  care  was  taken  to  develop  a  format  for  input  which 
is  "user  friendly".  This  procedure  provides  for  easy,  stand  alone 
data  editing  and  update.  Additionally,  since  one  Df  the  main 
objectives  of  this  research  was  to  develop  a  tool  for  parametric 
studies,  the  data  is  stored  in  a  manner  so  as  to  provide  for 
flexibility  in  the  use  of  the  data  files.  The  input  which  is  to 
be  stored  to  a  permanent  file  is  separated  into  three  main 
categories;  weather  and  zone  independent  data,  zone  unique  data 
and  control  data.  All  simulations  require  the  initiation  of  the 
weather  and  zone  independent  data  permanent  file.  It  includes 
information  on  outside  dry  and  wet  bulb  temperatures,  plenum 
envelope  load  and  assumed  relative  humidity  exiting  the  coils. 
The  second  category  of  files  which  is  required  by  each  simulation 
contains  the  zone  unique  data.  For  the  constant  volume  systems, 
the  data  is  contained  in  one  file  consisting  of  space  sensible  and 
latent  loads,  zone  set  point  temperature,  required  air  volume 
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rate*  and  lighting  load.  For  the  OAV  system,  the  air  volume  data 
in  this  file  is  input  as  the  minimum  air  volume  rate  allowed.  The 
maximum  primary  and  secondary,  or  induced,  air  volume  rates  are 
input  as  a  separate  file. 

The  third  category  of  permanent  files  is  only  used  when 
the  control  strategy  is  chosen  as  outside  air  controlled.  For 
this  case,  a  schedule  of  outside  air  temperature  versus 
corresponding  leaving  coil  temperature  must  be  input.  The  program 
will  search  this  file  during  each  hour  of  the  simulation.  It  will 
look  for  an  outside  air  dry  bulb  temperature<+0.5°F)  which 
corresponds  to  the  one  input  above  in  the  weather  and  zone 
independent  file.  It  will  then  set  the  leaving  coil  temperature 
for  the  particular  hour  based  on  the  leaving  coil  temperature 
found  in  this  file. 

All  the  above  mentioned  files  are  stored  to  a  hard  or 
floppy  disc  and  can  be  reused  without  reinputting  the  data  for 
each  simulation. 

Another  way  that  flexibility  is  enhanced  is  the 
inclusion  of  options  to  alter  the  default  constants  and  systems 
configuration  each  time  a  simulation  is  run.  These  selections  are 
not  stored  in  a  permanent  file  and  are  usually  made  with  a  single 
alphanumeric  character  input  or  selection  of  a  variable  value. 

A  detailed  description  of  the  input  routine  is  provided 
in  Appendix  C.  It  details  every  step  needed  to  be  accomplished  by 
describing  exactly  what  will  be  seen  on  the  computer  screen  and 
what  information  will  be  required  during  input.  Appendix  C  can  be 
used  as  a  user’s  manual  during  input  or  as  a  prior  reference  to 
insure  all  data  which  will  be  required  for  input  is  available. 
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4.3  PROGRAMMING  AND  EXECUTION  LOGIC 


4,3.1  Initial  Proqr amm i nq  Decisions 


During  the  initial  stages  of  this  research,  many  basic 
decisions  had  to  be  made  with  respect  to  how  the  code  for  the 
computer  program  was  to  be  written.  These  included  which  computer 
language  would  be  used,  how  the  code  should  be  sectioned,  how 
input  should  be  obtained  and  how  to  develop  the  code  in  a  manner 
which  allowed  for  the  greatest  clarity  and  ease  of  update. 

The  decision  was  made  to  use  FORTRAN  77  as  the  computer 
language  for  the  code.  As  mentioned  previously,  it  was  chosen 
mainly  because  of  its  flexibility. 

Separate  subroutines  were  used  for  every  major 
calculation  or  set  of  calculations  required  for  intermediate 
results.  The  program  is  made  up  of  a  driver  main  program,  which 
is  also  the  input/output  routine,  and  twelve  subroutines.  The 
code  is  contained  in  Appendix  D.  It  was  felt  that  the  use  of  many 
subroutines  would  reduce  the  time  required  for  future  revisions, 
the  time  required  for  compilation,  and  the  time  required  during 
the  initial  program  development.  The  names  of  the  subroutines 
show  the  major  intermediate  or  final  result  calculated  within. 
Most  of  the  subroutines  are  very  short  and  revisions  required  to 
include  additional  systems  or  controls  options  should  be  able  to 
be  accomplished  easily. 

Since  subroutines  were  used,  different  variables  had  to 
be  passed  into  and  out  of  each  one  for  use  between  them.  This 
could  have  been  accomplished  one  of  two  ways;  by  passing  the 


variables  as  arguments  in  the  CALL  statements  or  by  using  COMMON 
statements.  It  was  thought  that  COMMON  statements  would  provide 
the  vehicle  for  minimizing  errors  associated  with  the  passage  of 
variables.  Furthermore,  because  all  subroutines  did  not  need  to 
pass  all  the  same  variables,  it  was  initially  felt  that  the  COMMON 


statements  would  section  the  variables  passed  and  allow  easier  and 
quicker  observation  of  the  variables  used  by  each  subroutine.  As 
the  program  developed  though)  their  use  for  the  purpose  of  clarity 
diminished.  The  variables  contained  in  each  COMMON  block  were 
revised  many  times  during  the  program’s  development  so  as  to 
reduce  the  number  of  statements  used  by  each  subroutine.  Finally) 
in  the  interest  of  time>  this  effort  was  discontinued.  It  was 
determined  that  further  revision  would  contribute  only  minimally 
to  added  clarity.  These  block  statements)  though  not  optimally 
divided)  still  provided  the  sectioning  which  was  initially 
desired.  The  problem  in  using  the  COMMON  statement  is  that  when 
future  revisions  are  made  to  a  COMMON  statement)  care  must  be 
taken  to  include  the  change  in  each  subroutine  which  has  the  same 
five  letter  designated  COMMON  statement. 

The  final  major  decision  which  had  to  be  made  prior  to 
beginning  code  entry  was  the  method  of  data  input  and  storage. 
Two  methods  were  evaluated  for  possible  use.  The  first  method  was 
to  have  the  user  be  required  to  set  up  one  or  more  permanent  files 
for  input  data  with  the  use  of  whatever  editing  tool  was  available 
and  to  provide  a  user’s  input  manual  which  described  each  variable 
set  to  be  input.  The  program  would  then  call  and  read  this  file 
during  its  execution.  This  would  have  made  the  code  contained  in 
this  work  much  shorter)  but  would  have  made  the  input  of  the  large 
amount  of  data  much  more  laborious  for  the  user.  Specific 


instructions  would  have  had  to  be  provided  to  ensure  the  file  was 
formatted  correctly  so  as  to  allow  for  proper  reading  by  the 
program.  Changing  data  for  parametric  studies  would  have  required 
opening  the  permanent  file(s))  making  the  changes  and  then 
rerunning  the  program.  It  was  felt  that  this  method  contained  a 
greater  potential  for  data  error,  input  ambiguity)  user  confusion 
and  most  of  all)  it  would  require  more  of  the  user’s  time. 
Additionally)  it  would  have  required  the  user  to  have  an  editing 
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program  compatible  with  this  program.  The  main  reason  that  the 
method  described  in  Appendix  C  was  chosen  was  because  it  provided 
a  straightforward,  stand  alone  method  for  obtaining  results. 
Nothing  besides  the  executable  file  of  the  program  would  be 
required,  except  the  data  itself.  The  method  chosen  may  be  a 
little  slower  during  initial  input,  but  changing  only  specific 
variables  or  options  should  be  much  quicker  and  provide  for  only  a 
small  chance  for  error. 


4.3.E  Program  Execution 


Upon  completion  of  data  input,  the  program  is  begun  by 
typing  HVAC.  It  should  be  noted  that  the  computer  keyboard  should 
be  in  the  "CAPS  ON"  mode  because  the  program  does  not  recognize 
lower  case  letters  for  some  of  the  options.  The  programs  begins 
by  calculating  the  cross-sectional  areas  for  all  branch  ducts  and 
trunk  duct  sections  using  Equation  (4).  In  the  case  of  the  VAV 
system,  the  maximum  volumetric  flow  rate  is  used.  The  design  flow 
in  each  trunk  duct  section  is  determined  by  subtracting  off  the 
flow  for  each  zone  at  the  branch.  Then,  after  initializing  all 
"flags"  and  required  data  fields,  it  begins  the  twenty-four  hour 
simulation. 

Ten  "flags"  or  checks  are  used  in  the  program  which 
allow  the  program  to  check  if  an  intermediate  result  has  been 
initially  calculated,  a  maximum  or  minimum  has  been  reached  or  an 
iteration  has  been  been  completed.  They  are  designated  IFLAG1 
through  IFLAG9  and  IWCHk'  and  their  specific  purpose  is  described 
in  the  variable  table  of  Appendix  B. 

For  the  first  iteration  of  the  first  hour  of  each 
simulation,  the  temperature  of  the  plenum  is  set  to  the  assumed 
plenum  temperature.  This  value  is  obtained  from  the  default 
constants  table  (i.e.  81°F  or  the  temperature  it  was  changed  to 
during  input).  The  temperature  of  the  air  mixture  leaving  the 


coils  is  set  to  55T,  unless  the  fixed  set  point  control  method 
is  chosen.  In  this  case.  it  is  set  to  the  input  value.  The 
return  air  temperature  is  set  to  the  assumed  plenum  temperature. 
In  hours  two  through  twenty-four,  these  temperatures  are  set  to 
their  respective  values  for  the  previous  hour.  For  the  first 
iteration  of  every  hour,  the  flow  rate  to  each  zone  is  set  to  its 
maximum  when  the  VAV  system  is  being  simulated.  The  cycling 
system  is  initially  assumed  to  be  running  80’/.  of  the  time  for  the 
first  iteration  each  hour.  If  the  program  determines  there  is  no 
load  to  all  zones,  it  completes  only  one  iteration  and  proceeds  to 
the  next  hour.  A  comment  stating  that  the  system  was  nut  running 
during  that  hour  will  be  contained  in  the  results.  The  program 
completes  one  iteration  in  this  case  because  it  will  need  previous 
hour  values  for  some  of  the  variables,  as  described  above,  in  the 
fol lowing  hour . 

The  program  executes  by  performing  three  main  iteration 
loops,  depending  on  the  system  and  control  strategy  selected,  each 
hour.  It  iterates  on  the  flow  of  air  delivered  to  each  zone,  the 
leaving  coil  air  temperature  and  the  plenum  air  temperature. 
These  loops  are  described  below. 

The  innermost  loop  is  used  with  the  VAV  system  only.  It 
calculates  the  required  flow  rate  to  each  zone  based  on  the  load 
in  the  zone  and  the  temperature  of  air  being  supplied.  This  loop 
is  contained  in  the  subroutine  CFMREQD.  The  air  flow  rates  are 
calculated  differently,  depending  on  the  control  strategy  chosen. 
When  the  control  strategy  is  either  the  fixed  set  point  or  outside 
air  controlled  method,  the  flow  rates  to  each  zone  are  decreased 
from  their  maximum  values  to  exactly  match  the  load.  If  there  is 
more  than  a  1%  difference  in  the  flow  to  any  zone  from  the 
previous  iteration,  the  total  flow  to  all  zones  is  recomputed  and 
a  new  plenum  temperature  is  calculated.  The  new  plenum 
temperature  is  calculated  because,  even  though  the  air  temperature 


off  the  coils  remains  the  same  with  these  control  strategies,  the 
heat  lost  to  the  plenum  changes  and  thus,  the  temperature  of  air 
being  supplied  to  each  zone  changes.  This  is  a  result  of  the 
increased  or  reduced  air  flow  in  the  duct  system  and  through  the 
fan.  In  the  program,  this  recomputation  of  the  plenum  temperature 
is  actually  accomplished  by  telling  the  program  to  recalculate  the 
leaving  coil  air  temperature  (i.e.  setting  IFLAG2  equal  to  zero). 
It  is  done  this  way  because,  since  the  plenum  temperature  has 
already  been  calculated  in  its  own  subroutine  prior  to  the  total 
flow  rate,  it  will  not  be  recalculated  if  it  has  not  changed  more 
than  0 . 1 V.  from  the  previous  value.  Therefore,  results  could  be 
produced  using  an  inaccurate  plenum  temperature.  New  flow  rates 
are  calculated  again,  using  the  new  plenum  temperature  and  thus, 
new  supply  air  temperature. 

If  the  flow  rate  to  any  zone  reaches  a  minimum  allowed, 
zone  return  air  is  mixed  with  the  supply  air,  at  the  plenum 
temperature.  It  is  reheated  if  necessary  as  described  in  the 
section  VARIABLE  AIR  VOLUME  SYSTEM  of  Chapter  2.  When  the  zone 
controlled  method  is  chosen  with  the  VAV  system,  the  first  pass 
through  the  air  flow  loop  just  determines  the  zone  requiring  the 
lowest  leaving  coil  temperature  at  the  maximum  air  flow  rates. 
This  zone  is  marked  and  remains  the  controlling  zone  for  each 
iteration  during  the  hour.  The  flow  rate  to  this  controlling  zone 
will  remain  at  its  maximum.  The  flow  rates  to  the  remaining  zones 
will  be  iterated  upon  as  described  above.  Since  both  supply 
temperature  and  flow  are  allowed  to  vary  with  this  configuration 
of  system  and  control,  one  of  them  had  to  be  fixed  by  the  program. 
It  was  decided  that  fixing  the  flow  rate  to  its  maximum  value 
would  produce  the  highest  temperature  of  air  off  the  coils  (or  the 
lowest  temperature  in  the  heating  mode)  and  thus,  the  lowest  load 
on  the  coils.  Of  course,  this  reduction  in  load  would  be  nearly 
offset  by  the  increased  air  flow.  With  this  method  and  the  use  of 


an  economizer,  the  range  in  which  "free  cooling"  could  occur  would 
increase.  The  exception  to  this  procedure  occurs  when  the 
temperature  leaving  the  coil  is  determined  to  be  greater  than  the 
maximum  allowed.  Here,  the  leaving  coil  air  temperature  is  set  to 
the  maximum  allowable  and  the  flow  rates  to  all  zones  are  reduced. 
In  this  case,  the  program  works  as  if  the  fixed  set  point  control 
method  had  been  chosen  for  that  hour. 

The  middle  iteration  loop  calculates  the  temperature  of 
the  air  mixture  leaving  the  coils  and  is  contained  in  the 
subroutine  SETTLCC.  Iteration  is  only  required  when  the  zone 
controlled  method  is  selected.  For  all  three  systems  simulated, 
the  controlling  zone  is  determined  and  marked  prior  to  entering 
the  SETTLCC  subroutine.  This  is  accomplished  in  the  TSZREQD 
subroutine  by  calculating  the  supply  air  temperature  required  to 
exactly  satisfy  the  space  load  and  then  subtracting  from  this  the 
temperature  of  the  air  which  is  actually  supplied.  The  lowest 
resulting  value,  whether  it  be  positive  or  negative,  is  marked. 
Physically,  this  resulting  value  is  the  temperature  difference  for 
the  zone  requiring  the  least  reheat,  or  the  most  additional 
cooling.  Once  the  controlling  zone  has  been  determined,  the 
SETTLCC  subroutine  takes  the  controlling  zone’s  required  supply 
air  temperature  and  subtracts  the  temperature  rises  occurring  in 
the  duct  system  due  to  the  supply  fan  and  trunk  and  branch  duct 
heat  exchange  with  the  plenum.  This  becomes  the  new  estimate  for 
the  leaving  coil  temperature.  If  the  calculated  value  differs 
from  the  previous  iteration  by  more  than  0.1’/.,  then  the  two 
temperatures  are  averaged  and  another  iteration  is  accomplished. 
This  is  done  for  a  specific  plenum  temperature,  between  plenum 
temperature  iterations. 

The  outermost  loop  iterates  on  the  temperature  of  the 
air  in  the  plenum.  The  calculation  of  the  plenum  temperature  is 
accomplished  in  the  subroutine  TPLENUM.  The  equations  used  and 


methods  followed  were  discussed  previously  in  the  section  PLENUM 
TEMPERATURE  CALCULATIONS.  As  with  the  leaving  coil  air 
temperature,  if  the  calculated  value  of  the  plenum  temperature 
differs  from  the  previous  iteration  (or  initial  assumption)  by 
more  than  0.1*/.,  then  the  values  from  the  previous  and  current 
iteration  are  averaged  and  another  plenum  temperature  is 
calculated . 

When  the  cycling  system  is  simulated,  the  program  must 
determine  the  system’s  running  time  per  hour.  If  the  zone 
controlled  method  is  chosen,  the  program  assumes  the  system  will 
always  be  running  because  only  a  single  zone  can  be  simulated  and 
the  zone  control  method  chooses  a  leaving  coil  temperature  which 
exactly  satisfies  the  hourly  loads.  This  will  be  the  case  unless 
the  maximum  allowable  coil  temperature  is  reached.  For  the  other 
two  control  methods,  usually  only  one  or  two  iterations  are 
required  to  determine  this  running  time  within  1*/..  During  the 
iteration,  if  the  calculated  value  differs  from  the  previous  or 
assumed  value  by  more  than  1'/.,  the  previous  value  is  set  equal  to 
the  calculated  value  and  another  iteration  accomplished. 


CHAPTER  5 


DISCUSSION  OF  RESULTS 

The  purpose  of  this  chapter  will  be  to  demonstrate  some 
of  the  capabilities  of  the  program  developed.  This  will  be 
accomplished?  in  part?  with  the  use  of  a  space  loads  data  base 
obtained  from  an  execution  of  the  DDE  2. IB  mainframe  facility 
energy  simulation  program.  There  are  many  different  combinations 
of  system,  control  strategy,  economizer  and  fan  control  options 
which  could  be  used  for  case  studies.  In  the  interest  of  space, 
only  two  case  studies  will  be  presented  here.  The  first  study 
compares  the  performance  of  the  Terminal  Reheat  (TRH)  and  V M 
systems  with  varying  control  strategies.  It  is  accomplished  under 
both  summer  and  winter  conditions.  Also,  the  same  two  systems 
will  be  studied  using  autumn  data  for  different  economizer  option 
choices.  The  results  of  these  analyses  are  discussed  below. 

A  medium  sized,  one-story,  10,000  ft8,  office  building 
in  Phoenix,  Arizona  was  chosen  as  the  basis  for  the  simulations. 
This  facility  contained  four,  cardinally  oriented,  exterior  zones 
and  an  interior  zone.  East  and  West  zones  measured  fifteen  feet 
deep  by  seventy  feet  wide.  North  and  south  measured  fifteen  feet 
deep  by  one  hundred  feet  wide.  The  central  zone  was  a  seventy 
foot  square.  The  HVAC  system  was  modeled  as  being  situated  on  the 
west  wall  of  the  facility  and  thus,  the  duct  system  runs  began 
there.  The  decision  to  use  this  facility  was  based  solely  on  the 
fact  that  there  was  already  an  existing  loads  data  base. [121 

Information  pertaining  to  the  individual  zones  and 
weather  data  was  extracted  from  the  output  of  a  DOE  2. IB 
simulation.  A  total  listing  of  the  DOE  2  simulation  output  is  not 
presented  as  only  the  loads  data  are  used.  The  DOE  2. IB  output 
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which  has  been  used  as  input  to  this  program  is  listed  in  the 
input  permanent  files.  A  complete  sample  input  listing  for  one  of 
the  simulations  is  presented  in  Appendix  A.  Three  separate  input 
permanent  files,  described  in  the  section  DATA  INPUT  OPTIONS,  for 
the  VAV  system  are  also  included.  All  remaining  non-system  data 
used  in  the  input  (i.e.  plenum  wall  load  and  maximum  zone  and 
induction  volumetric  flow  rates)  were  developed  either  from 
calculations  performed  with  available  loads  information  or,  in  the 
case  of  the  flow  rates,  by  running  trial  and  error  program 
simulations. 

It  is  emphasized  again  that  no  attempt  will  be  made  to 
compare  the  results  of  this  program  with  those  of  the  DOE  2. IB  or 
any  other  energy  prediction  program.  The  objective  of  this  work 
is  to  provide  the  ability  to  characterize  the  performance  of  one 
HVAC  system,  coupled  with  its  control  strategy  option,  relative  to 
the  performance  of  other  possible  combination  system  and  control 
choices. 


5.1  CASE  STUDY  ONE-CONTROL  STRATEGIES 

This  case  study  was  presented  to  show  how  the  program 
depicts  the  performance  of  both  the  VAV  and  Terminal  Reheat 
systems  with  varying  control  strategies.  The  fixed  set  point 
(FSP)  and  zone  controlled  method  (ZCN)  of  control  were  selected. 
Alt  the  variables  listed  below  were  used  and  kept  constant  for  the 
simulations  contained  in  this  study. 

- Duct  "U"  value  set  at  O.E  Btu/hr-ft2. 


- All  other  default  constants  unchanged. 


- Dry  bulb  economizer  option  chosen.  (The  amount  of 

outside  air  would  have  remained  at  a  minimum  no  matter  which 
economizer  choice  was  selected  for  the  summer  weather 
conditions.  For  the  winter  weather  conditions,  100'/.  outside 
air  was  used  for  all  hours  except  the  first  morning  hour.) 


- The  minimum  percentage  of  outside  air  allowed  set  at 

10%. 


- Summer  and  winter  weather  data  (i.e.  wet  and  dry  bulb 

temperatures)  from  Phoenix,  Arizona  used. 

- Assumed  maximum  relative  humidity  off  coils  set  at  98%. 

- Plenum  envelope  load  based  on  BOO  Btu/hr  per  °F 

temperature  difference  between  plenum  and  outside  air. 

- Zone  sensible  and  latent  loads,  set  point  temperatures 

and  lighting  energy  from  DOE-8. IB  used. 

- Total  design  pressure  drop  across  supply  fan  set  at  3.5 

inches  of  water. 

-  --Supply  fan  design  efficiency  set  at  75%. 

- Supply  fan  motor  design  efficiency  set  at  95%. 

- Total  design  pressure  drop  across  return  fan  set  at  0.5 

inches  of  water. 

. --Return  fan  design  efficiency  set  at  70%. 

- Return  fan  motor  design  efficiency  set  at  90%. 


The  differences  in  the  input  for  the  two  systems  came  in 
the  areas  of  zone  volumetric  flow  rates  and  control  of  the  fans. 
For  the  Terminal  Reheat  system  simulations,  since  a  constant  flow 
rate  was  input  for  each  zone,  constant  speed  supply  and  return 
fans  were  simulated.  Both  the  supply  and  return  fans  for  the  VAV 
system  were  simulated  as  variable  speed  motors.  The  default 


coefficients  contained  in  the  program  were  not  changed  for  these 
fans.  The  maximum  allowable  zone  flow  rates  for  the  VAV  system 
simulations  were  determined  using  a  fixed  set  point  for  the  coil 
discharge  temperature.  The  CFM  rate  which  corresponded  to  each 
zone  peak  was  then  selected  as  its  maximum.  A  value  equal  to  75% 


of  the  maximum  primary  rate  was  selected  for  the  maximum  induction 


rate  in  each  zone  of  the  VAV  simulations.  As  it  turned  out,  no 
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induction  was  necessary  for  either  VAV  summer  simulation.  For  the 
winter  runs,  recirculated  air  was  used.  However,  the  maximum 
available  flow  was  never  reached.  The  minimum  volumetric  flow 
rates  for  the  VAV  system  were  determined  from  the  occupancy 
schedule  and  minimum  rate  allowed  on  a  per  person  basis. [123  The 
maximum  VAV  rates  were  also  used  as  the  basis  for  the  constant 
volume  flow  settings  of  the  TRH  simulations. 

Two  sets  of  simulations  were  conducted  for  summer  and 
two  for  winter.  The  first  set  consisted  of  both  systems  assuming 
the  fixed  set  point  method  of  control.  The  second  set  assumed  the 
zone  control  reset  method  was  used.  Results  of  these  simulations 
are  shown  graphically  in  Figure  5.1  and  Figure  5.2. 


I 
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5.1.1  Summer  Simulations 

As  was  expected,  the  resulting  load  on  the  coils  for  the 
VAV  system  was  found  to  be  significantly  less  than  for  the  TRH 
system  using  either  method  of  control.  The  energy  wasted  due  to 
the  increased  coil  load  with  the  Terminal  Reheat  system  was  not 
the  only  reason  for  additional  energy  use  with  this  system.  Using 
the  zone  controlled  method,  the  leaving  coil  temperature  had  to  be 
set  low  enough  to  satisfy  the  controlling  zone  in  each  hour.  This 
meant  that  all  other  zones  had  to  reheat  the  incoming  supply  air 
to  maintain  the  desired  comfort  level.  With  the  fixed  leaving 
coil  set  point,  the  results  were  even  worse.  In  this  case,  the 
temperature  leaving  the  coils  had  to  be  set  low  enough  to  satisfy 
the  zone  with  the  highest  load  during  the  entire  simulation 
period.  Therefore,  there  was  only  one  zone,  and  only  for  two 
hours,  which  did  not  require  the  supply  air  to  be  reheated.  The 
other  source  of  wasted  energy  in  the  Terminal  Reheat  system  was  in 
the  higher  volume  of  air  which  had  to  pass  through  the  fans. 
Since  fan  motor  energy  does  not  appear  explicitly  in  the 
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simulation,  the  additional  fan  energy  used  did  not  show  explicitly 
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in  the  results.  What  was  affected  was  the  temperature  rise  of  the 
supply  and  return  air  mixtures  due  to  the  fans.  Assuming  that  the 
fans  used  in  both  systems  were  rated  for  the  same  design  volume, 
the  temperature  rise  in  the  VAV  system  was  between  10'/.  and  20'/. 
less  than  that  of  the  Terminal  Reheat  system  for  the  period  of 
simulation.  (This  was  on  the  order  of  approximately  0.5°F  for  the 
fan  data  input . ) 

This  study  also  was  able  to  show  how  each  system  was 
affected  by  the  control  strategy  chosen.  For  the  VAV  system 
summer  operation,  both  control  schemes  produced  essentially  the 
same  coil  load  for  each  hour  of  operation.  In  fact,  for  over  half 
the  hours  simulated,  coil  loads  differed  by  less  than  0.2%.  As 
can  be  seen  in  Figure  5.1,  the  VAV  system  required  somewhat  more 
air  volume  to  satisfy  the  loads  when  the  zone  controlled  strategy 
was  chosen.  This  was  due  to  the  higher  coil  discharge  temperature 
allowed  by  this  control.  The  control  selection  had  a  much  bigger 
impact  for  the  Terminal  Reheat  system.  The  reduced  load  during 
the  off  peak  morning  hours  could  not  lead  to  reduced  air  flows. 
The  only  way  to  adjust  to  reduce  coil  load  was  to  allow  the 
leaving  coil  temperature  to  vary  (zone  controlled  method).  Use  of 
the  zone  controlled  method  instead  of  the  fixed  set  point  method 
provided  an  average  savings  of  almost  6%  in  the  midday  hours  with 
the  TRH  system.  (A  much  greater  savings  was  realized  in  the  start 
up  morning  hours.) 

The  system  was  allowed  to  shut  off  during  the  night  time 
hours.  During  this  time,  the  individual  zone  set  point 
temperatures  were  allowed  to  rise  to  87^.  No  cooling  was  ever 
required  to  attain  or  maintain  this  temperature.  When  the  system 
was  activated  in  the  seventh  hour,  the  space  loads  were  low  and 
the  leaving  coil  air  temperature  high  because  the  zone  set  points 
were  only  reduced  to  82°F  for  morning  start  up.  Additionally, 
there  was  no  latent  load  because  occupancy  was  not  allowed  until 


the  eighth  hour.  All  the  remaining  hours  maintained  set  point 
temperatures  of  approximately  78^. 

5.1.8  Winter  Simulations 

As  can  be  seen  in  Figure  5.8,  the  trends  of  the  winter 
simulations  mirrored  the  summer  ones  closely.  There  was  a 
significant  increase  in  coil  load  when  the  Terminal  Reheat  system 
was  used  versus  the  VAV  system.  The  method  of  control  was  not 
important  during  the  periods  of  peak  loading  for  either  system. 
The  ability  to  vary  the  air  volume  with  the  VAV  system  was  used  to 
offset  the  penalty  of  fixing  the  leaving  coil  temperature.  As 
this  could  not  be  accomplished  with  the  TRH  system,  the  coil  load 
for  the  fixed  set  point  method  was  much  greater  than  for  the  zone 
controlled  during  the  reduced  load  morning  hours. 

The  main  difference  between  the  simulations  for  the  two 
weather  conditions  was  that  a  net  space  heating  load  was  realized 
in  the  first  morning  hour  of  the  winter.  During  this  hour,  use  of 
the  zone  controlled  method  allowed  the  required  coil  discharge 
temperature  to  rise  above  the  outside  air  temperature.  5ince  this 
occurred,  the  dry  bulb  controlled  economizer  was  able  to  mix 
outside  air  (45'/.)  with  return  air  ( 55’/. )  and  provide  a  period  of 
"free  cooling".  When  the  fixed  set  point  method  was  used,  the 
leaving  coil  temperature  had  to  be  set  low  enough  to  satisfy  the 
afternoon  cooling  loads.  This  actually  produced  a  cooling  load  on 
the  coils  with  both  systems  in  the  first  hour,  even  with  the 
economizer  using  100*/.  outside  air.  Also,  because  the  supply  air 
temperature  was  low,  the  TRH  system  required  a  significant  amount 
of  reheat  for  each  zone.  With  the  VAV  system,  the  flow  rate  to 
every  zone  was  reduced  to  its  minimum  and  return  air  was 
recirculated  to  raise  the  supply  air  to  the  desired  mixture 
temperature . 


5.2  CASE  STUDY  TWO-ECONOMIZER  OPTIONS 


This  case  study  was  presented  to  show  how  the  economizer 
option  chosen  affects  the  performance  of  both  the  UAV  and  Terminal 
Reheat  systems  with  this  program.  All  three  economizer  options; 
no  economizer,  dry  bulb  temperature  controlled  and  enthalpy 
controlled,  were  simulated  in  this  study.  Additionally,  both 
systems  were  controlled  in  the  simulations  using  both  the  fixed 
set  point  and  zone  controlled  methods.  All  the  variables  listed 
below  were  used  and  kept  constant  for  the  simulations  contained  in 
this  study. 

- Duct  "U"  value  set  at  0.2  Btu/hr-fte. 

- All  other  default  constants  unchanged. 

- The  minimum  percentage  of  outside  air  allowed  set  at 

1 0% . 

- Autumn  dry  bulb  temperatures  from  the  Phoenix,  Arizona 

weather  used.  (The  wet  bulb  temperatures  were  increased  to 
simulate  a  more  humid  climate.  This  was  done  to  better  show 
the  differences  between  the  two  economizer  choices  under  wet 
coi 1  condi tions. ) 

- Assumed  maximum  relative  humidity  off  coils  set  at  98'/.. 

- Plenum  envelope  load  based  on  800  Btu/hr  per  °F 

temperature  difference  between  plenum  and  outside  air. 

- Zone  sensible  and  latent  loads,  set  point  temperatures 

and  lighting  energy  from  DOE-2. IB  used. 

- Total  design  pressure  drop  across  supply  fan  set  at  3.5 

inches  of  water. 

- Supply  fan  design  efficiency  set  at  75’/.. 

- Supply  fan  motor  design  efficiency  set  at  95'/.. 

- Total  design  pressure  drop  across  return  fan  set  at  0.5 

inches  of  water. 

-Return  fan  design  efficiency  set  at  70’/.. 
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Figure  5.3  Econcomizer  Performance-TRH(FSP) 


- Return  fan  motor  design  efficiency  set  at  90’/.. 

- Constant  speed  fans  used  for  Terminal  Reheat 

simulations. 

- Fans  with  variable  speed  motors  used  for  VAV 

simulations.  Fan  performance  default  coefficients  remained 
unchanged . 


The  individual  zone  air  flow  rates  were  determined  using  the  same 
procedures  outlined  above  in  Case  Study  One.  The  results  of  this 
study  are  shown  in  Figures  5.3  through  5.7. 

In  each  of  the  four  sets  of  simulations  conducted)  use 
of  the  enthalpy  controlled  economizer  resulted  in  the  lowest  coil 
load.  When  the  VAV  system  were  simulated  as  having  a  zone 
controlled  leaving  coil  temperature.  both  economizer  choices 
allowed  a  "free-cooling"  condition  to  occur  in  the  seventh  and 
eighth  hours.  Additionally.  as  expected,  when  no  economizer  was 
simulated  the  load  on  the  coils  was  at  its  maximum  for  the  input 
1  oads . 

This  study  also  showed  the  energy  savings  which  are  lost 
when  the  dry  bulb  economizer  is  used  instead  of  one  controlled  by 
enthalpy.  In  hour  ten,  the  use  of  the  enthalpy  controlled 
economizer  resulted  in  a  lower  coil  load  for  both  systems.  The 
lower  coil  load  occurred  for  both  control  strategies  employed. 
The  performance  of  the  two  economizers  could  be  brought  closer  in 
line  for  a  specific  geographic  location  by  selecting  a  higher 
maximum  dry  bulb  temperature  acceptable  for  the  dry  bulb 
controlled  economizer.  This  could  be  done  by  changing  the  default 
value  contained  in  the  program. 
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Figure  5.5  Economizer  Performance-VAV(FSP) 
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The  results  of  this  study  were  also  used  to  compare  the 
TRH  and  VAV  systems  under  differing  control  strategies,  as  was 
done  in  Case  Study  One.  This  comparison  is  contained  in  Figure 
5.7.  Again,  the  VAV  system  showed  a  marked  reduction  in  coil  load 
over  the  TRH  system  for  all  three  economizer  options  employed. 
Additionally,  the  relative  independence  of  control  strategy  chosen 
for  the  VAV  system  was  again  evident,  especially  during  off-peak 
loading . 
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CONCLUSIONS  AND  RECOMMENDATIONS 

6.1  CONCLUSIONS 

For  the  case  studies  presented*  the  program  developed  by 
this  work  reacted  well  to  changes  in  HVAC  system  and  control 
choices.  The  studies  showed,  as  expected,  that  the  use  of  a  VAV 
system  instead  of  a  Terminal  Reheat  system  resulted  in  a  lower 
load  on  the  coils  for  comparable  load  and  weather  inputs.  Also, 
because  of  its  inability  to  vary  the  air  flow  to  the  individual 
zones,  the  Terminal  Reheat  system  was  more  sensitive  to  the  choice 
of  control  strategy  employed.  The  second  case  study  showed  that 
using  an  economizer  reduced  the  load  on  the  coil  by  bringing  the 
inlet  conditions  closer  to  the  required  outlet  conditions.  This 
study  also  showed  that,  for  the  input  data,  the  enthalpy 
controlled  economizer  determined  the  inlet  conditions  equally  or 
better  than  the  dry  bulb  controlled  economizer  in  all  cases. 

6 . 2  RECOMMENDATIONS 

Many  simulations  were  run  with  the  program  using  the 
existing  data  base  obtained  from  the  DOE  2  output.  All  this  data 
was  for  a  facility  in  Phoenix,  Arizona,  a  warm,  dry  location.  It 
is  recommended  that  this  program  be  tested  further  using  loads 
from  other  climates.  Specifically,  climates  with  a  high  winter 
f  heating  load.  Additionally,  loads  on  the  Cycling  system  modeled 

in  the  program  were  simulated  by  adding  the  loads  from  the 
individual  zones  and  averaging  the  zone  set  point  temperatures. 
This  was  accomplished  in  order  to  compare  the  output  with  the 
other  two  systems  simulated.  The  resulting  output  seemed  to  show 
the  correct  load  trends  but,  since  the  manner  for  input  was 


questionable)  the  results  were  not  included  in  the  case  studies  as 
comparable  results  to  the  other  two  systems.  Therefore)  it  is 
suggested  that  load  data  for  a  single  zone  facility  be  used  to 
further  test  the  model. 

It  is  believed  that  the  program  developed  by  this  work 
is  flexible  and  provides  the  user  with  many  system  and  control 
choices  by  which  to  simulate  HVAC  operations.  There  are>  though, 
many  other  systems  and  control  choices  which  are  needed  in  certain 
instances.  It  is  recommended  that  this  program  be  expanded  to 
include  other  system  choices.  Single  duct  systems  should  be  able 
to  use  many  of  the  same  subroutines  developed  here.  Multiduct 
systems  may  need  additional  subroutines  to  handle  the  supply  air 
delivery.  It  is  also  recommended  that  variations  to  the  systems 
already  included  in  the  program  be  looked  at  for  possible 
inclusion.  Included  here  are  Terminal  Reheat  and  VAV  systems  with 
baseboard  heaters  for  exterior  zones  and  no  induction  for  the  VAV 
system . 

□ne  of  the  limitations  to  this  program  mentioned  earlier 
was  the  fact  that  it  was  developed  under  the  assumptions  of 
constant  standard  barometric  pressure  and  at  sea  level.  The 
equations  for  specific  volume  contain  the  pressure  implicitly  in 
the  0.0252112  constant  term.  The  specific  enthalpy  equations  were 
all  developed  using  data  which  was  developed  for  the  standard 
conditions.  The  equation  for  the  saturated  humidity  ratio  does 
carry  an  explicit  pressure  term,  but  it  was  considered  a  constant 
for  this  work.  It  is  suggested  that  these  variables  be  modified 
to  allow  for  a  variable  atmospheric  pressure.  The  pressure  could 
be  included  in  the  default  constants  section  of  the  main  program 
and  passed  to  the  applicable  subroutines  in  common  block  AAAAA; 
which  is  included  in  all  subroutines.  Then,  the  user  would  be 
able  to  vary  the  pressure,  if  needed,  without  having  to  input  it 
every  time  when  standard  pressure  conditions  exist.  Additionally, 


correction  factors  for  altitude  are  available  which  would  allow 
for  the  altitude  to  be  an  input. [7]  The  factor,  passed  again  in 
common  block  AAAAA,  could  be  included  in  the  applicable  equations 
with  no  change  in  programming  logic  or  execution. 

Modifications  to  the  program  in  the  area  of  duct 
geometry  should  be  included  to  allow  for  the  simulation  of  round, 
square,  rectangular  or  flat  oval  duct.  If  this  is  accomplished, 
the  changes  should  be  made  to  the  area  calculation  equations  in 
the  main  program  and  the  duct  heat  loss  equations  of  subroutines 
TDUCT  and  QDUCT . 

Finally,  this  program  could  be  combined  with  other 
programs.  It  could  be  mated  with  the  output  from  a  loads  program 
which  would  set  up  the  permanent  files  and  greatly  reduce  the 
amount  of  initial  input  required  to  execute  the  program. 
Furthermore,  the  program’s  output  files  could  be  reformatted  and 
become  the  input  to  subsequent  component  energy  simulations  and 
economic  programs.  This  would  provide  an  overall  energy 
characterization  tool  for  use  in  HVAC  systems  design.  The 
development  of  such  a  tool  would  prove  invaluable  to  the  HVAC 
engineer  in  optimal  systems  decisions.  It  would  be  inexpensive  to 
use  and  readily  available  for  the  average  practicing  HVAC 


INPUT  DAT* 


(It  STSTEM  USED . 

(2)  CONTROL  METHOD  USED  . 

(3)  ECONOMIZER  METHOD . 

(3a)  Minima  percentage . 

si  outside  air  al loved 

(4)  WEATHER  DATA  FILENAHE  . 

(3)  ZONE  UNIQUE  DATA  F I LENAKE . 

(3a)  Nai iaus  zone  pr iaary  air  . 

vo  I  urge  rale  t  naiiaua  induction 
air  volume  rats  data  (i lenaae 
(6!  SUPPLY  FAN  DATA 

((a)  Design  total  pressure  drop 

(6b)  Fan  design  ell  iciency  . 

(6c)  Motor  design  efficiency . 

(6d)  Fan  air  volume  control  settled 

(7)  RETURN  FAN  DATA 

(7a)  Design  total  pressure  drop 

(7b )  Fan  design  efficiency . 

1 7 e )  Notor  design  efficiency  . 

(7d)  Fan  air  voluae  control  aethod 

(8)  NUMBER  OF  CHANGES  FOR  VALUES  OF  THE 
DEFAULT  CONSTANTS 


VARIABLE  AIR  VOLUME  WITH 
INDUCTION  REHEATERS 
ZONE  CONTROLLED 
OUTSIDE  AIR  CONTROLLED 
10.01 

JUIV 

JULVAV3 

JULCFNNX 


3  50  1  inches  ol  water! 
75  01 
95  01 

VARIABLE  SPEED  MOTOR 


501  inches  of  water) 
70  Ol 
90  01 

VARIABLE  SPEED  MOTOR 
0 


79 


SYSTEM  DAT* 


TEMPERATURE  HUMIDITY  COOL  INS  PERCENT 

LEAVING  RATIO  COIL  PREHEATER  OUTSIDE 

COOLING  LEAVING  LOAD  LOAD  AIR  USED 

HOUR  COIL(oF)  CCOIl  (BTU/HR)  (BTU/HR)  (1/100) 


1 

tilt  PRIMARY 

2 

tttt  PRIMARY 

3 

tttt  PRIMARY 

4 

tttt  PRIMARY 

5 

tttt  PRIMARY 

6 

tttt  PRIMARY 

7 

68  0 

01383 

8 

55  7 

01075 

9 

55  7 

00927 

10 

55  4 

009  18 

It 

55  4 

009  1  9 

12 

55  4 

009  18 

13 

54  8 

00897 

14 

54  7 

.00891 

15 

54  4 

00886 

16 

53  4 

00852 

17 

53  5 

00856 

18 

tttt  PRIMARY 

19 

tttt  PRIMARY 

20 

tttt  PRIMARY 

21 

till  PRIMARY 

22 

tttt  PRIMARY 

23 

tttt  PRIMARY 

24 

tttt  PRIMARY 

SYSTEM  OFF  t 
SYSTEM  OFF  I 
SYSTEM  OFF  t 
SYSTEM  OFF  « 
SYSTEM  OFF  t 
SYSTEM  OFF  I 


92893  6 

0 

10 

2084C2  5 

0 

10 

259877  2 

0 

10 

273986  7 

0 

10 

283580  9 

0 

to 

283859  8 

0 

10 

284868  6 

0 

10 

295306  5 

0 

10 

304937  0 

0 

10 

3117097 

0 

.  10 

303963  5 

0 

.10 

SYSTEM  OFF  t 
SYSTEM  OFF  » 
SYSTEM  OFF  I 
SY5TEN  OFF  t 
SYSTEM  OFF  » 
SYSTEM  OFF  t 
SYSTEM  OFF  t 


ZONE  DAT* 


ZONE 


ZONE  2 


ZONE  3 


PR  I  NARY  INOCTN  REHEAT  PRINARY  INDCTN  REHEAT  PRINARY  INDCTN  REHEAT 
CFN  CFN  8TU/HR  CFN  CFN  BTlf/HR  CFN  CFN  BTU/HR 


0 

0 

0 

0 

0 

0 

.0 

.0 

.0 

0 

.0 

0 

0 

0 

.0 

.0 

.0 

.0 

0 

0 

.0 

0 

.0 

.0 

.0 

0 

.0 

0 

0 

0 

0 

0 

.0 

.0 

.0 

.0 

0 

0 

0 

0 

.0 

0 

.0 

.0 

0 

0 

0 

0 

0 

0 

.0 

.0 

0 

.0 

1258 

A 

0 

0 

1122 

5 

.0 

.0 

1161.1 

.0 

0 

1172 

e 

0 

.0 

M73 

9 

0 

.0 

1523. A 

0 

.0 

1017 

8 

0 

0 

1812 

8 

0 

0 

1640.1 

ft 

.0 

1032 

7 

0 

0 

1850 

0 

0 

.0 

1712.5 

0 

.0 

1125 

4 

0 

0 

1850 

0 

c 

0 

1750  2 

0 

0 

1165 

8 

0 

0 

1850 

0 

.0 

0 

1  788  8 

0 

0 

1169 

A 

0 

0 

1850 

0 

0 

0 

1751  A 

0 

.0 

1335 

A 

0 

0 

1850 

0 

0 

0 

1  82  2  5 

.0 

0 

1611 

1 

0 

0 

185C 

0 

0 

0 

1  850.0 

0 

.0 

1700 

0 

0 

c 

1777 

1 

0 

0 

1328  A 

0 

1700 

0 

0 

0 

1850 

0 

0 

0 

1  850  0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

.0 

■ 

0 

0 

0 

0 

.0 

0 

.0 

0 

.0 

0 

0 

0 

0 

.0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

.0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

.0 

.0 

0 

£ 


,\ 

A 


a 

► 

7; 

V 


2 


s 


i: 

* 


If* 


I 


ft 

r 


v 


\ 

V 


X 


V 

c 

w' 


s  '.  ■«  «  '  , 


.%  /  '  N  A  A  .v  _*•  .n 


PRIKART  IHDCTN  REHEAT  PR t MART  INDCTN  REHEAT 
OF*  CFK  BTII/HR  CFR  CFR  BTU/HR 


.0  .0 

.0  0 

.0  985.8 

.0  1675  0 

.0  1675.0 
0  1675  0 
.0  1675  0 

0  1427  3 

0  1 2  5  C  9 
.0  1266  7 

.0  1299  9 

.0  1192  C 


t 

I 

* 


WEATHER  FILE  DATA 

MAX  REL 

OUTSIDE 

OUTSIDE 

PLENUM 

HUMIDITY 

DRY  BULB 

WET  BULB 

ENVELOPE 

EXITING 

TEMPERATURE 

TEMPERATURE 

LOAD 

COILS 

(oF ) 

(oF) 

(BTU/HR) 

(1) 

20800  0 
2 ’600  0 
21600  0 
22400  0 


2000C  0 
!  9200  0 
17600.0 
16000  0 
1  4  4  00  0 
12600  0 


pWWOTWV 

I 

( 


;»1 


i 


i  Ul  M J.I  |f*  f. 


i! 

y 

i 

i* 

’,i 

* 

$  Wc. 


INPUT  DATA  FOP  ZONE  NAMED  CENTRAL  (ZONE  2) 


ZONE  AREA 

4900 

00000  SQ.FT 

TRUNK  DUCT  LENGTH 

TO  (RANCH 

50. 

00000  FT 

BRANCH 

DUCT  LENGTH 

20 

00000  FT 

CEILING 

•U'  VALUE 

30000  BTU/HR- 

SQ.FT.-oF 

MININUN 

TOTAL 

LIGHTING 

SENSIBLE 

LATENT 

AIR  FLOW 

SET  POINT 

LIGHTING 

ENERGY  TO 

OUR 

LOAD 

LOAD 

RATE 

TEMPERATURE  ENER6TI 

PLENVNi 

... 

(BTU/HR) 

(BTU/HR! 

(CFN! 

<oF) 

(BTU/HR) 

(BTU/HR) 

1 

.0 

0 

0 

87  0 

4165  0 

2499  0 

2 

.0 

0 

.0 

87.0 

4165.0 

2499  0 

3 

.0 

0 

.0 

87.0 

4165  0 

2499  0 

4 

.0 

.0 

.0 

87  0 

41650 

2499  0 

5 

.0 

.0 

.0 

87.0 

4165 .0 

2499  0 

4 

.0 

.0 

.0 

87  0 

4165.0 

2499.0 

7 

13939.0 

2800.0 

280  0 

82  0 

4165  0 

2499.0 

8 

25567  0 

5(00  0 

280.0 

78  8 

41650  0 

24990  0 

5 

39126  0 

5600.0 

280  0 

78  9 

4  1650  0 

24990  0 

10 

40703  0 

5(00  0 

2S0  0 

78  9 

4  1650  0 

2499C  0 

1! 

40790  0 

5600  0 

280  0 

79  0 

41650.0 

24990.0 

12 

42592  0 

5(00  0 

280.0 

79  2 

41650  0 

24990  0 

13 

42907.0 

5600.0 

280  0 

79.3 

4  1  650  0 

24990  0 

14 

43248  0 

5600  0 

280  0 

79  5 

41650.0 

24990  0 

15 

43517.0 

5(00  0 

260  0 

79.6 

4  1  650  0 

24990  0 

16 

43463  0 

5600  0 

280  0 

79  6 

4  1  650  0 

24990.0 

17 

44320.0 

2800  0 

2  80.0 

79  0 

4  1  650  0 

24990  0 

18 

0 

0 

.0 

87  0 

41650  0 

24990  0 

19 

.0 

0 

0 

87  0 

4  1650  0 

24990  0 

20 

0 

0 

.0 

87.0 

4165  0 

2499.0 

21 

.0 

0 

0 

87  0 

4165.0 

2499  0 

22 

.0 

.0 

.0 

87  0 

4165  0 

2499  0 

23 

0 

0 

0 

87  0 

4165  0 

2499  0 

24 

.0 

0 

.0 

87.0 

4165.0 

2499.0 

INCTE  THE  ENEPGT  ENTERING  THE  ZONE  IS  INCLUDED  IN  THE  SENSIBLE  LOAD 


MAXIMUM  PR  I  MART 
AIR  FLOW  RATE 
(CFN) 


1850  oe 


MAXIMUM  INDUCTION 
AIR  FLOW  RATE 
(CFN) 


VA’V 


MV,  v 


ww-vw.: 


K 


85 


INPUT  DATA  FOP  ZONE  NANED  NORTH  (ZONE  3) 


ZONE  AREA 

1500 

00000  SQ  FT 

TRUNK  DUCT  LENGTH 

TO  BRANCH 

50 

00000  FT 

BRANCH 

DUCT  LENGTH 

70 

00000  FT. 

CEILING 

■U*  VALUE 

30000  BTU/HR- 

SQ  FT  -oF 

MINIMUM 

TOTAL 

LIGHTING 

SENSIBLE 

LATENT 

AIR  FLOW 

SET  POINT 

LIGHTING 

ENEPGT  TO 

HOUR 

LOAD 

LOAD 

RATE 

TENPERATURE  ENER6TI 

PLENUM! 

=  =  =  = 

(BTU1HR1 

(BTU/HRI 

(CFN) 

( #F ) 

(BTU1HR) 

zz  xsszzzz: 

(BTU1HR) 

1 

.0 

.0 

.0 

87  0 

1275  0 

765  0 

2 

0 

0 

.0 

87  0 

1275  0 

765  0 

3 

0 

0 

.0 

87  0 

1275.0 

765  0 

4 

0 

.0 

.0 

87.0 

1275  0 

765  0 

5 

.0 

0 

.0 

87.0 

1275  0 

765  0 

6 

.0 

0 

0 

87.0 

1275.0 

765  0 

7 

13472.0 

857  0 

85.0 

81.8 

1275.0 

765  0 

8 

24272.0 

1715.0 

85  0 

78  2 

12750.0 

7650.0 

9 

33008  0 

1715  0 

85  0 

78  4 

12750  0 

7650.0 

10 

35144  0 

1715.0 

85  0 

78  5 

12750.0 

7650  0 

II 

35977.0 

1715.0 

85  0 

78  6 

12750.0 

7650  0 

12 

36880  0 

1715  0 

85  0 

78  6 

12750  0 

7650  0 

13 

37358  0 

1715.0 

85.0 

78  7 

12750  0 

7650.0 

14 

39226.0 

1715  0 

85  0 

78  8 

12750  0 

7650.0 

15 

41188  0 

1715.0 

85  0 

78.9 

12750  0 

7650  0 

16 

41792  0 

1715  0 

85.0 

78  3 

12750  0 

7650. C 

17 

42091.0 

857  0 

85.0 

78  9 

12750  0 

7650  0 

18 

.0 

0 

.0 

67.0 

12750  0 

7650  0 

19 

.0 

0 

.0 

81 . 0 

12750  0 

7650  0 

20 

.0 

0 

0 

87  0 

1275  0 

76  5  0 

21 

.0 

.  0 

0 

87  0 

1  275  0 

765  0 

22 

.0 

0 

.0 

87  0 

1275  0 

765  C 

23 

.0 

0 

0 

87.0 

1275  0 

765.0 

24 

0 

0 

.0 

87.0 

1275.0 

765.0 

INOTE  THE  ENEPGT  ENTERING  THE  ZONE  IS  INCLUDED  IN  THE  SENSIBLE  LOAD 


NAT  I  NUN  PR  INART 
AIR  FLOW  RATE 
(CFN! 


1  850. 00 


MAXIMUM  INDUCTION 
AIR  FLOW  RATE 
(CFN' 


1310.00 


86 


P 


INPUT  DATA 

FOR  ZONE  NAMED  SOUTH 

(ZONE  4) 

ZONE  AREA 

1500. 

00000  SQ.FT. 

TRUNK  OUCT  LENGTH 

TC  BRANCH 

50 

00000  FT, 

BRANCH 

DUCT  LENGTH 

70. 

00000  FT. 

CEILING 

■U1  VALUE 

30000  BTU/HR- 

SQ.FT.-8F 

MINIMUM 

TOTAL 

l i Gri i i NG 

SENSIBLE 

LATENT 

AIR  FLOW 

SET  POINT 

LIGHTING 

ENERGY  TO 

IOUB 

LOAD 

LOAD 

RATE 

TEMPERATURE  ENER6TI 

PLENUM! 

.... 

(BTU/HR) 

(BTU/HR! 

(CFMI 

!  oF ) 

(ETUIHR) 

(BTU/HR) 

1 

.0 

.0 

0 

87.0 

1275  0 

765  0 

2 

.0 

.0 

0 

87.0 

1275.0 

765.0 

3 

.0 

.0 

0 

87.0 

1275  0 

765  0 

4 

.0 

.0 

.0 

87.0 

1275  0 

765.0 

5 

0 

0 

.0 

87  0 

1275  0 

765.0 

6 

.0 

0 

0 

87.0 

1275.0 

765.0 

7 

15078.0 

857  0 

85  0 

80.3 

1275  0 

765  0 

8 

26954  0 

1715  0 

85.0 

78  0 

12750  0 

7650.0 

9 

335  19  0 

1715  0 

85  0 

78.2 

12750  0 

7650  0 

to 

36777  0 

1715  0 

15.0 

78.4 

12750  0 

765D  0 

II 

38250  0 

1715.0 

85.0 

78.6 

12750  0 

7650  0 

12 

424  1  0  0 

1715  0 

85.0 

78  6 

12750  0 

7650  0 

13 

44629  0 

1715  0 

85  0 

78  7 

12750  0 

7650  0 

14 

44938  0 

1715.0 

85.0 

78  8 

12750  0 

7650  C 

15 

45359  0 

1715  0 

85  0 

75  8 

12750  0 

7650  0 

16 

44069  0 

1715  0 

85.0 

78  7 

12750.0 

7650  0 

17 

43009  0 

857  0 

85  0 

78  6 

12750  0 

7650  0 

!8 

0 

0 

0 

87.0 

12750  0 

7650  0 

19 

0 

.3 

0 

87  0 

12750.0 

765C  0 

20 

.0 

.0 

0 

87  C 

1  275  0 

765.0 

21 

0 

0 

0 

87  0 

1275  0 

765  0 

22 

0 

.0 

0 

87  0 

1275.0 

765.0 

23 

.0 

.0 

.0 

87  0 

1275  0 

765  0 

24 

.0 

.0 

.0 

87  0 

1275  0 

765  0 

•NOTE  THE  ENEROT  ENTERING  THE  ZONE  IS  INCLUDED  IN  THE  SENSIBLE  LOAD 


NAT  I  NUN  PR  I  NARY 
AIR  FLOW  BATE 
(CFNI 


2000  00 


MAXIMUM  INDUCTION 
AIB  FLOW  RATE 
(CFNI 


150000 


S' 

A** 


2« 


ft 

& 


r^»’«Nr. 


INPUT  OAT*  FOB  ZONE  NAMED  EAST  (ZONE  5) 


ZONE  ABEA 

TRUNK  DUCT  LENGTH  TO  BRANCH 


1050  00000  SQ  FT 
92  50000  FT. 


i 

BRANCH 

DUCT  LENGTH 

25 

00000  FT 

! 

CEIL1N6 

*U*  VALUE 

30000  BTU/HB- 

SQ.FT  -«F 

■ 

i 

MINIMUM 

TOTAL 

LIGHTING 

SENSIBLE 

LATENT 

AIB  Ft  ON 

SET  POINT 

LIGHTIN6 

ENEBGY  T 

V 

HOUB 

L0A0 

LOAO 

BATE 

TENPEBATUBE  ENERGY! 

PLENUM* 

(BTU/HB) 

(BTU/HB! 

(CFN) 

(oF) 

(BTU/HB) 

(BTU/HB) 

5 

3 

1 

0 

0 

.0 

87  0 

892  5 

535  5 

2 

0 

0 

.0 

87  0 

892  5 

535  5 

3 

.0 

0 

0 

87  0 

892  5 

535  5 

i 

4 

0 

.0 

.0 

87  0 

892.5 

535  5 

* 

5 

0 

0 

.0 

87  0 

892  5 

535  5 

* 

6 

.0 

0 

.0 

87.0 

892  5 

535  5 

'v 

\ 

7 

11442.0 

600  0 

60  0 

81.7 

892  5 

535  5 

8 

29218  0 

1  200  0 

60  0 

78  8 

8925  0 

5355  0 

9 

39028  0 

1200  0 

60  0 

80  3 

8925  0 

5355  0 

| 

10 

37499  0 

1200  0 

60  0 

79  2 

8925  0 

5355.0 

11 

36795.0 

1  200  0 

60  0 

78.9 

8925  0 

5355  0 

s 

12 

29380  0 

1200.0 

60  0 

78  5 

8925  0 

5355  0 

13 

26099  0 

1200  0 

60  0 

78  3 

8925  0 

5355  0 

S 

s 

* 

14 

26640.0 

1  200  0 

60  0 

78  4 

8925  0 

5355  0 

15 

26507  0 

1202  0 

60  0 

78  4 

8925  0 

5355  3 

1 

16 

26431  0 

1200  0 

60  0 

78  4 

8925  0 

5  355  0 

■ 

V 

17 

25959  0 

600  0 

60  0 

78  3 

8925  0 

5355  0 

IE 

0 

0 

0 

87  0 

8925  0 

5  35  5  0 

•v 

19 

0 

0 

.0 

8?  0 

8925  0 

5355  0 

20 

.0 

.0 

0 

87  0 

892  5 

535  5 

\ 

21 

0 

0 

0 

87  0 

892  5 

535  5 

i 

*>  "I 

0 

0 

0 

87  0 

892  5 

535  5 

23 

0 

.0 

.0 

87.0 

892.5 

535  5 

[ 

24 

.0 

.0 

.0 

87  0 

892  5 

535  5 

•NOTE  THE  ENEBST  ENTEBIN6  THE  ZONE  IS  INCLUDED  IN  THE  SENSIBLE  LOAD 


MAXIMUM  PRIMARY 
AIR  FLOW  BATE 
(CFN) 


MAX  I  MUM  INDUCTION 
AIB  FLOW  BATE 
(CFN) 


1075  00 


1250.00 


This  appendix  is  provided  to  give  a  brief  description  of  the 
variables  used  in  the  program  source  code  contained  in  Appendix  D. 


VARIABLE 

NAMES 

ACFM< I ) 
ACFM2 ( I ) 
AD(  I ) 

ADZ ( I ) 

AZ(I) 

AMXECON 


AMXTLCC 

CFM ( I  >  J ) 

CFMZ(I.J) 

CFMZI(I,J) 

CFMZIM(I) 

CFMZMN ( I ,  J ) 

CFMZMX ( I ) 

CPA 

CPL 

CPV 

CPMLCC 

CPMMIX 


CPV 

DTD(I) 

DTDT(I) 

DTDZ(I) 

DTRF 

DTRH(I) 

DTSF 

FANTYP 

FCHOOZ 


DESCRIPTION 

Design  trunk  duct  air  volume  rate 
Design  branch  duct  air  volume  rate 
Design  trunk  duct  area 
Design  branch  duct  area 
Zone  area 

Maximum  allowable  outside  air 
bulb  temperature  for  economizer 
operat ion 

Maximum  allowable  leaving  coil 
temperature 

Trunk  duct  air  volume  rate 
(at  zone  branch  off) 

Branch  duct(zone)  air  volume  rate 
Zone  induction  air  volume  rate 
Maximum  zone  induction  air  volume 
rate 

Minimum  zone  air  volume  rate 
Maximum  zone  air  volume  rate 
Specific  heat  of  dry  air 
Specific  heat  of  liquid  water 
Specific  neat  of  vapor 
Specific  heat  of  moist  air  mixture 
leaving  the  coils 

Specific  heat  of  moist  air  mixture 
entering  the  coils 
Specific  heat  of  returning  moist 
air  mi xture 

Specific  heat  of  vapor 
Temperature  change  in  segment  of 
trunk  duct 

Total  temperature  change  in  trunk 
due  t 

Temperature  change  in  branch  duct 
Temperature  rise  due  to  return  fan 
Temperature  change  required  for 
reheat 

Temperature  rise  due  to  supply  fan 
Type  of  fan/control  method  used 
Editing  option  for  weather  file 


UNITS 

f  t 3/  m  1  n 
f  1 3/m 1 n 
f  te 
ftE 
fte 
°F 


f  t  3/  mi  n 


f  t3/  mm 


Btu/lbm-°F 
Btu/ lbm~°E 
Btu/  lbim-** 
Btu/lbm-nE 

Btu  / 1  bm-°E 

Bt u / i bm- °F 

Btu/ 1 b  m - °F 
°F 


°F 

Char  ac  ter  s 
Char ac  tei 


VARIABLE 

NAMES 

FCHUZM 


FCHUZS 


FCHUZZ 

FLUXW 

FNAME 

FRDL 

FRHRA 
FRHR ( J ) 
FRQLGT 

FZNAME 

HG 

HGLCC 


HRA 

ICNTRL 

ICT 

I FLAG 1 
IFLAG2 
IFLAG3 


IFLAG4 


IFLAG5 


IFLAG6 


IFLAG7 


DESCRIPTION  UNITS 

Editing  option  for  maximum  primary  Character 

and  secondary  air  volume  rates  file 
(for  use  with  the  VAV  system) 

Editing  option  for  outside  air  Character 

controlled  leaving  coil  temperature 
schedule  file 

Editing  option  for  zone  unique  Character 

data  file 

Plenum  wall  heat  flux  Btu/hr-°P 

File  name  for  weather  data  Characters 

Fraction  of  total  air  volume  lost  V./100 

due  to  duct  leakage 

Assumed  system  running  time  per  hour 
Actual  system  running  time  per  hour 
Fraction  of  lighting  energy  which  '/.  100 

enters  the  plenum 

File  name  for  zone  unique  data  file 
Enthalpy  of  saturated  vapor  Btu- lbm-°F 

Enthalpy  of  saturated  vapor  leaving  Btu/lDm-0<- 

cooling  coil 

Enthalpy  of  air  mixture  leaving  Etu/lbm-°f 

coo ling  coil 

Enthalpy  of  return  air  mixture  Btu'lbm-°F 

Control  method  choice  Integer 

Far,  part  load  characteristic  choice  Character 

Determines  if  a  return  temperature  integer 

has  been  calculated. 

Determines  if  a  final  leaving  coil  Integer 

temperature  has  been  calculated. 

Determines  if  an  interim  leaving  Integer 

coil  temperature  has  been  calcu¬ 
lated 

Determines  if  ail  outside  tempera-  Integer 

tures  encountered  in  the  simulation 
have  been  entered  in  the  outside 
air  control  schedule. 

Determines  if  zone  CFMs  have  been  Intege' 

calculated  for  a  particular  interim 
leaving  coil  temperature 

Determines  if  zone  CFM  iterations  Integer 

have  been  accomplished  within  the 
CFMREOD  subroutine  for  the  VAV 
system  option. 

bets  the  controlling  zone  Inteoer 


uv.v. V.V.Vx 


VARIABLE 

NAMES 


DESCRIPTION 


UNITS 


IFLAGBU) 

Determines  if  zone  CFMs  have  been 
set  to  their  minimum  value  with  the 
VAV  system  option 

1 nteger 

I  MO  A 

Economizer  method  choice 

I nteger 

ISFAN 

Fan  choice 

1 nteger 

ISYSTM 

System  choice 

1 nteger 

IWCHK 

Determines  if  the  coil  is  dry 

I nteger 

JX 

Hour  designator  in  subroutines 

I nteger 

HI) 

Distance  from  system  to  zone 
branch  along  trunk  duct 

ft 

LZ<  I ) 

Length  of  branch  duct 

ft 

MAXCFM 

File  name  for  maximum  primary  and 
secondary  air  volume  rate  file 
(for  use  with  VAV  system) 

Char-  ac  t  er 

MIN 

Controlling  zone  indicator 

I nteger 

MN 

Controlling  zone  indicator 
(for  use  with  VAv  system) 

Integer 

OUTFILE 

File  name  for  saving  output 

Character 

PI 

Pi-computed  as  h*A^c tarn  1 .0 i 

Raoians 

PTOA(J) 

Fraction  of  outside  air  volume  used 

/  1 00 

PTOAM 

Minimum  fraction  of  outside  air 
vo 1 ume  a  1 1 owab i e 

'/./  1 00 

QCCLU) 

Cooiing  coil  total  load 

B  t  u  /  h  r 

QDUC7 

Heal  loss 'g Ci..  in  djrt  system 

Btu/hr 

QLGZ ( I » J ) 

Zone  lighting  energy 

Btu/hr-ft 

ID 

r 

N 

Zone  latent  load 

Btu/ hr 

QPH(J) 

Preheat  coi i  load 

Btu/hr 

QPLW ( J ) 

Plenum  wai 1  load 

Btu-hr 

QRHZ(I.J) 

Zone  reheater  load 

Btu/hr 

Q5Z ( 1 1 J  > 

Zone  sensible  loa-1 

Btu/hr 

RFANn 

Return  fan  design  efficiency 

VO  100 

RFHP 

Return  fan  design  horsepower 

hp 

RFPLD(K) 

Return  fan  part  load  characteristic 
coefficient  change  choice 

Char  ac  ter 

RH(  J) 

Assumed  relative  humidity  leaving 
cooiing  coil 

RMOTn 

Return  fan  moto1'  design  efficiency 

V./  100 

SCHDLE 

File  name  for  outside  air  control 
method  schedule 

Character^ 

SFANn 

Supply  fan  design  efficiency 

%  /  i  0  J 

SFHP 

Supply  fan  desiqn  horsepower 

hD 

SFPLD(K) 

Supply  fan  part  load  characteristic 
coefficient  change  choice 

Character 

SMOTn 

Supply  fan  motor  desiqn  efficiency 

100 

SPVI ( I > 

Specific  volume  of  induction  an 

ft3  1  b  m 

VARIABLE 

NAMES 


DESCRIPTION 


UNITS 


SPVS(I) 

Specific  volume  of  zone  supply  air 

f  t  3'  1  bm 

SPVSD 

Specific  volume  of  supply  duct  air 

ft3-  1  bm 

SPV2(I) 

Specific  volume  of  zone  air 

f  t  3/  1  bm 

STLCC(K) 

Leaving  coil  air  temperature  in 
outside  air  control  method  schedule 

°F 

STOA<K) 

Outside  air  dry  bulb  temperature  in 
outside  air  control  method  schedule 

°F 

TO(  I ) 

Trunk  duct  air  temperature  at  zone 
branches 

°F 

TOO 

Default  value  of  leaving  coil  air 
temperatur  e 

°F 

TLCC( J) 

Leaving  coil  air  temperature 

TLCCA  <  J ) 

Absolute  leaving  coil  air  temper¬ 
ature 

op 

TLCCF 

Leaving  coil  air  temper ature < for 
fixed  control  method) 

op 

TMI X 

Entering  coil  air  temperature 

°F 

TOA(J) 

Outside  air  dry  bulb  temperature 

°F 

TPL 

Plenum  air  temperature 

°F 

TPL! 

Interim  plenum  air  temperature 

°F 

TPLA 

Assumed  plenum  air  temperature 

°F 

TPR 

Total  pressure  drop  across  return 
fan 

in.  of  H  eu 

TPS 

Total  pressure  drop  across  supply 
f  an 

in.  of  H  eO 

TR  ( J) 

Return  air  temperature 

°F 

TSUPRZU) 

Reguired  zone  air  supply  temper¬ 
ature 

°F 

TSUPZtl) 

Zone  air  supply  temperature 

°F 

TSUPZI < I ) 

Zone  air  supply  temperature  after 
i  nduc  1 1  on  (  f  or  vhV  system,  option' 

°F 

TWBCF) 

Outside  wet  bulb  temperature 

°F 

TZ  < I » J ) 

Zone  set  point  temperature 

°F 

UCZ 

Ceiling  "U"  value 

Btu/f  t*=-°F 

UD 

Duct  system  "U"  value 

Btu/ft5-1^ 

V 

Design  trunk  duct  velocity 
(assumed  constant  in  trunk) 

f  t  '  m>  i  n 

VD 

Design  branch  duct  velocity 
(assumed  constant  in  branch) 

f  t  /  m  i  n 

WLCC(J) 

Humidity  ratio  leaving  the  coils 

lb  of  H^O 

lb  dry  air 

WMIX  Humidity  ratio  entering  the  coils  lb  of  HeG' 

lb  dry  air 
lb  of  HjJj' 
lb  dry  air 


WMIXA 


Assumed  plenum  humidity  ra’io 


VARIABLE 

NAMES 


DESCRIPTION 


UNITS 


WOA 

WOAS 

WR 

WZ(I) 

YN1-YN6 


Outside  air  humidity  ratio 

Saturated  dutside  air  humidity 
ratio 

Return  air  humidity  ratio 
Zone  humidity  ratio 
Yes/No  choice  character 


!(j  of  HeO/ 
lb  dry  air 
lb  Of  HeO/ 

lb  dry  a  1 r 
lb  of  HeO/ 
lb  dry  air 
lb  of  HeO ' 
lb  dry  air 
Cha-"  ac  ter 


APPENDIX  C 


PROGRAM  USER  * S  GUIDE 


DATA  INPUT  QPTI0N5 

A  description  of  the  input  routine  for  the  program 
contained  in  Appendix  D  is  provided  below.  Its  main  purpose  is  to 
provide  a  user’s  guide  to  the  program’s  input  phase  of  execution. 
It  can  be  used  directly  with  the  executable  file  of  the  program, 
if  one  is  available.  The  program  begins  the  run  when  the  user 
types  HVAC.  It  should  be  noted  that  the  keyboard  should  be  in  the 
CAPS-LOCK-ON  mode  or  the  program  will  not  recognize  some  of  the 
required  input.  The  required  units  for  all  input  values  will 
always  be  shown  somewhere  on  the  screen  during  the  input.  The 
user  should  ensure  the  correct  units  are  used  or  erroneous  results 
will  be  produced . 

DEFAULT  OPTIONS 

The  program  begins  by  providing  the  user  with  a  look  at 
the  constants  used  in  the  simulation.  These  include  the  specific 
heats  of  dry  air,  water  vapor  and  liquid  water,  the  maximum  trunk 
and  branch  duct  velocities,  the  assumed  initial  plenum 
temperature,  the  duct  and  ceiling  "U"  values,  the  fraction  of 
lighting  energy  which  is  released  directly  into  the  plenum,  the 
maximum  outside  air  dry  bulb  temperature  allowed  for  economizer 
operation,  the  fraction  of  total  air  volume  leaked  to  the  plenum 
out  of  the  duct  system  and  the  maximum  allowable  leaving  coil  air 
temperature.  The  user  has  the  option  of  changing  any  of  these 
values  by  entering  the  number  printed  on  the  screen  to  the  left  of 
the  constant’s  description  and  then  entering  the  new  value  of  the 
constant.  The  new  constant  will  be  recorded  and  the  constants 
list  again  printed  to  the  screen,  showing  the  updated  value.  The 
units  of  each  constant  are  included  and  care  should  be  taken  to 
match  these  with  any  changes  made.  The  value  "99"  is  entered  if 
no  changes  are  desired  or  when  all  changes  have  been  completed. 
Any  changes  made  during  a  particular  run  are  not  stored  for  future 


runs.  In  the  case  where  one  or  more  of  the  constants  will  have  to 
be  a  different  constant  value  all  or  most  of  the  time,  and  if  the 
software  source  code  is  available,  the  user  can  change  the  default 
in  the  source  code  of  the  input  routine. 


SYSTEM /CONTROL 5  OPTIONS 


The  system  type  and  leaving  coil  temperature  control 
method  are  selected  next.  Each  is  chosen  by  entering  the  number 
to  the  left  of  the  descr iptions.  The  program  will  not  allow  for 
numeric  entries  other  than  one,  two  or  three.  If  the  fixed  set 
point  control  method  is  chosen,  the  next  prompt  will  be  for  the 
fixed  set  point  value  to  be  used.  The  program  does  not  contain  a 
default  value,  so  one  must  be  entered. 

When  option  three,  the  outside  air  (dry  bulb)  control 
method,  is  selected,  the  program  will  then  ask  the  user  to 
indicate  the  schedule  to  be  used  to  set  the  temperature  of  the  air 
mixture  leaving  the  coil  based  on  a  corresponding  outside  air  dry 
bulb  temperature.  A  message  will  appear  on  the  screen  asking 
whether  or  not  the  user  wishes  to  enter  or  select  an  existing 
schedule.  If  a  schedule  is  not  to  be  selected  or  entered,  select 
the  "N"  option.  The  program  will  then  go  back  to  the  control 
method  options  and  a  different  option  may  be  selected.  The 
program  allows  for  the  creation  of  a  new  file,  edit  of  an  existing 
file  or  use  of  an  existing  file.  To  use  an  existing  file,  the  "U" 
option  should  be  chosen  and  the  existing  file  name  entered.  The 
program  will  then  progress  to  the  economizer  options. 

To  create  a  new  file,  the  "C"  option  should  be  selected. 
The  next  prompt  will  be  for  the  entry  of  a  file  name.  To  enter  a 
file  name,  the  drive  in  which  the  file  is  to  be  stored,  the  file 
name  and  the  extension  may  be  entered.  An  input  Df  up  to  fourteen 
alphanumeric  characters,  for  example  C :F ILENAME . EXT ,  is  allowed  by 
the  program.  Then  program  will  then  ask  for  dry  bulb  temperatures 


of  the  outside  air  and  air  mixture  leaving  the  coil.  A  leaving 
coil  air  temperature  for  each  outside  air  dry  bulb  temperature 
encountered  in  the  twenty-four  hour  simulation  must  be  included  in 
this  file.  The  input  for  this  file  is  not  limited  to  the  twenty- 
four,  or  less,  sets  of  temperatures  which  may  be  required  for  a 
single  simulation.  It  can  hold  up  to  150  sets  of  outside  versus 
leaving  coil  air  temperatures.  Therefore,  this  file  need  only  be 
set  up  once  for  a  specific  location  and  reused  again  and  again.  A 
data  point  of  "999,999"  must  be  entered  after  the  last  set  of 
values.  This  point  is  an  end  of  record  mark  and  will  tell  the 
program  that  input  is  completed. 

During  execution,  the  program  will  search  this  file 
looking  for  an  outside  air  temperature  which  corresponds  to  the 
outside  air  temperature  for  a  given  hour  as  input  in  the  weather 
and  zone  independent  file  described  below.  When  it  finds  an 
outside  temperature  within  +0.5DF,  it  will  set  the  leaving  coil 
temperature  based  on  the  one  that  is  attached  to  the  outside 
temperature  found  in  the  file.  If  the  program  encounters  an 
outside  temperature  without  an  associated  leaving  coil 
temperature,  a  message  stating,  "Outside  air  temperature 
encountered  in  hour  X  is  beyond  the  range  of  your  control 
schedule.  Either  your  control  method  or  schedule  must  be 
changed.",  will  be  printed  on  the  screen  during  the  simulation. 
In  this  case,  the  program  will  run  to  completion,  but  no  results 
will  be  printed.  The  user  should  make  every  effort  to  ensure  that 
this  does  not  happen  because  there  is  no  option  to  stop  the 
program  and  change  the  file.  Therefore,  all  the  data  would  have 
to  be  input  again  or  another  editor  used  to  include  the  omitted 
set  of  data. 

When  editing  an  existing  file,  which  has  been  chosen  by 
selecting  option  "E",  the  program  will  display  the  first  forty- 
eight  set  of  values  in  the  file  and  ask  if  the  values  to  be  edited 


are  shown.  If  they  are,  type  "Y",  the  number  to  the  left  of  the 
values  and  then  the  new  values  for  the  outside  dry  bulb 
temperature  and  correspond! ng  leaving  coil  temperature.  If  they 
are  not  shown,  type  "N”  and  the  program  will  display  the  next 
forty-eight  values.  Once  the  point  has  been  edited,  the  program 
will  ask  if  there  are  more  points  to  edit.  Either  a  "Y"  or  "N" 
response  is  required. 

The  next  input  is  that  of  the  minimum  fraction  of 
outside  air  which  must  be  used  in  the  simulation  for  ventilation 
purposes.  This  value  is  entered  as  the  ratio  of  the  volumetric 
flow  (CFM)  of  outside  air  to  the  total  volumetric  flow  entering 
the  coils  and  must  be  a  value  between  zero  and  one,  inclusive. 
Once  the  minimum  has  been  chosen,  the  manner  by  which  the  amount 
of  outside  air  entering  the  system  is  controlled  must  be  selected. 
The  economizer  choices  will  be  printed  to  the  screen  and  a  value 
of  one,  two  or  three  can  be  selected.  A  description  of  the 
principles  that  each  choice  uses  for  control  is  included  in  the 
section  ECONOMIZER  CONTROLS. 

ZONE  INDEPENDENT  DATA  INPUT 

A  separate  permanent  file  is  set  up  for  data  which  are 
independent  of  the  individual  zones.  It  contains  the  hourly 
outside  dry  bulb  and  wet  bulb  air  temperatures,  plenum  envelope 
load  and  assumed  maximum  relative  humidity  of  the  air  mixture 
leaving  the  coils  which  will  be  used  in  the  simulation.  The 
plenum  envelope  load  input  must  based  on  the  assumed  plenum 
temperature  selected  earlier  in  the  default  constants  portion  of 
the  input.  A  message  showing  the  assumed  plenum  temperature  which 
will  be  used  is  shown  on  the  screen.  The  assumed  relative 
humidity  leaving  the  coil  input  should  be  a  value  between  95V.  and 
100’/.,  input  as  '/./100.  This  value  corresponds  to  the  the  user's 
assumption  of  saturation  conditions  leaving  the  coil.  Depending 


99 


on  how  deep  the  coil  employed  is,  the  average  overall  condition  of 
a  "saturated"  air  mixture  leaving  the  coil  may  be  slightly  less 
than  saturated .( i  .e .  Relative  humidity  less  than  1007..) 

As  with  the  outside  air  control  method.  the  program 
provides  the  option  of  whether  to  use  or  edit  an  existing  file  or 
to  create  a  new  file. There  must  be  exactly  twenty-four  hours  of 
data  input  in  this  file.  After  a  "E",  "C"  or  "U”  choice  is  made, 
the  filename  is  entered.  as  described  above.  To  use  an  existing 
file,  again  the  "U"  option  should  be  chosen. 

When  creating  a  file,  the  program  allows  for  the  option 
of  having  a  constant  or  variable  assumed  relative  humidity  value 
exiting  the  coils.  For  a  constant  relative  humidity,  enter  the 
value  in  units  of  percent  relative  humidity  divided  by  100.  If  a 
variable  value  is  desired,  enter  any  numeric  value  greater  than 
one.  Depending  on  the  relative  humidity  option,  the  program  will 
then  ask  for  twenty-four  values  of  the  remaining  three  or  four 
items.  It  will  ask  for  the  data  by  hour  and  the  convention  used 
for  the  data  hour  is  that  hour  one  is  the  period  between  midnight 
and  one  o’clock  AM,  etc.  The  program  will  automatically  end 
taking  data  after  twenty-four  values.  No  special  end  of  file 
marker  is  stored  in  the  permanent  file  because  there  must  always 
he  exactly  twenty-four  hours  of  data. 

A  data  file  can  be  edited  immediately  after  inputting 
the  data  for  a  new  file  by  answering  "Y"  to  the  question  asking 
such,  or  by  selecting  the  "E"  option  for  file  use.  The  program 
will  prompt  for  the  hour  of  data  to  be  edited.  After  a  value 
between  one  and  twenty-four  is  entered,  the  data  existing  for  that 
hour  in  the  file  will  be  shown  on  the  screen  along  with  a  request 
for  the  new  data.  Any  hour  can  be  edited  as  many  times  as 
required.  The  editing  session  is  ended  by  entering  a  value  of 
"99"  for  the  hour  of  data  to  be  edited.  The  program  will  only 


upi;  uuvv.v.y. 
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recognize  hourly  values  of  one  through  twenty-four  and  "99"  for 
editing  options. 

ZONE  UNIQUE  DAT  ft  INPUT 

This  is  the  largest  permanent  file  set  up  by  the 
program.  It  contains  two  types  of  data  for  each  zone  in  the 
facility  simulated.  The  first  type  is  independent  of  the  hour  and 
includes  the  trunk  duct  distance  from  the  supply  fan  exit  to  the 
zone  branch  duct)  the  length  of  the  zone  branch  duct  and  the  zone 
area.  The  second  type  contains  hourly  zone  data  for  the  sensible 
and  latent  loads,  set  point  temperature)  air  volumetric  flow  rate, 
and  lighting  energy.  If  the  VAV  system  is  being  simulated)  the 
minimum  volumetric  flow  rate  is  used  instead  of  a  constant  value. 
All  four  options;  using)  editing  and  appending  an  existing  file 
and  creating  a  new  file>  are  available  for  input  of  this  data.  To 
use  an  existing  file,  the  "U"  option  should  be  selected  and  the 
existing  filename  entered. 

To  create  a  new  file)  the  "C"  option  should  be  chosen( 
followed  by  the  new  filename.  Prior  to  entering  the  data  for  any 
zone,  the  zones  should  be  arranged  and  numbered  sequentially) 
according  to  their  distance  away  from  the  supply  fan.  It  is  very 
important  that  the  "distance  from  the  supply  fan  to  the  branch 
duct"  value  for  zone  one  is  less  than,  or  equal  to,  the  distance 
for  zone  two  and  the  distance  for  zone  two  less  than  that  of  zone 
three  and  so  on.  This  is  because  the  program  calculates  the 
temperature  change  in  the  trunk  duct  by  sections.  The  section 
lengths  are  determined  by  subtracting  the  distance  to  the  branch 
duct  for  zone  six,  for  example,  from  that  of  zone  five.  If  this 
is  a  negative  value,  a  temperature  drop  would  be  realized  instead 
of  a  temperature  rise!  and  vice  versa. 


Once  the  zones  have  been  organized  and  numbered,  the 
program  will  ask  for  input  of  the  distance  from  the  supply  fan  to 


the  branch  duct,  the  length  of  the  branch  duct  and  the  area  for 
the  first  2one.  It  will  number  the  first  zone  entered  as  zone  one 
and  all  subsequent  zones  sequentially.  The  zones  can  be  named 
later  as  described  in  the  RESULTS  PRINTING  OPTIONS  section.  The 
next  input  will  be  for  the  zone’s  hourly  sensible  and  latent 
loads,  set  point  temperature,  air  volume  rate  and  lighting  energy. 
The  zone  and  hour  to  be  input  will  be  shown  on  the  screen  prior  to 
input.  The  program  will  only  take  twenty-four  hours  of  input  and 
then  ask  if  there  are  more  zones.  If  there  is  data  for  another 
zone,  a  "Y"  response  should  be  made  and  the  same  procedure  as 
outlined  above  should  be  followed.  When  the  data  for  the  last 
zone  has  been  input,  the  "N"  option  should  be  selected  when  the 
program  prompts  for  additional  zone  data  input. 

The  program  will  not  allow  input  of  a  trunk  duct  length 
less  than  the  previous  zone’s.  For  the  case  where  a  zone  closer 
to  the  supply  fan  is  omitted  in  the  initial  input,  the  file 
creation  should  continue  until  completion  of  input  of  all  data 
except  the  excluded  zone.  Then,  after  the  "N"  option  is  chosen 
for  the  "Are  there  more  zones  for  data  input?(Y/N)"  prompt,  the 
simulation  can  be  terminated  and  rerun.  Here,  for  all  files 
previously  created  above,  the  "U"  option  can  be  chosen.  For  the 
zone  unique  data  file,  the  "A"  option  should  be  chosen  and  the 
excluded  zone  input. 

After  the  data  for  the  last  zone  has  been  input,  the 
program  inserts  three  values  of  zero  to  the  end  of  the  file.  It 
does  this  to  aid  in  future  reading  of  the  file.  If  input  is 
accomplished  with  another  editor,  these  three  zeros  must  be 
included  as  the  last  entry.  At  this  point,  the  prompt  will  be  "Do 
you  want  to  edit  this  data?".  When  editing  is  desired,  follow  the 
procedures  below. 

To  edit  an  existing  data  file,  the  "E"  option  should  be 
chosen  along  with  the  existing  filename.  If  a  filename  is  entered 
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which  does  not  correspond  to  an  existing  file,  the  program 
execution  will  terminate.  The  program  will  then  ask  which  zone  is 
to  be  edited.  A  number  from  one  to  the  last  zone  in  the  file 
should  be  entered.  The  program  will  ask  for  this  number  again  if 
the  number  entered  is  greater  than  the  number  of  zones  currently 
in  the  file.  Once  the  zone  has  been  chosen,  either  the  hourly 
independent  or  hourly  data  can  be  edited.  To  edit  the  length  and 
area  data,  enter  a  value  of  zero.  The  current  data  in  the  file 
will  be  shown  and  a  request  to  enter  the  new  data.  If  the  value 
entered  for  the  trunk  duct  distance  from  the  supply  fan  is  greater 
than  the  distance  input  for  this  same  distance  in  the  next  zone  or 
less  than  the  value  in  the  previous  zone,  the  program  will  state 
that  the  distance  should  be  between  the  two  previously  input 
values.  Then  it  will  ask  if  the  editing  is  hourly  independent  or 
hourly  in  the  chosen  zone  again.  To  edit  hourly  data,  enter  the 
hour  of  the  data  to  be  edited.  The  program  will  display  the 
current  data  and  ask  for  the  new  data. 

Once  the  point  has  been  edited,  the  program  will  ask  for 
the  zone  number  of  the  next  edit.  The  new  zone  number  can  be 
entered  and  the  procedure  above  followed  or  a  value  of  "99"  can  be 
entered  if  editing  is  complete.  There  is  no  check  for  correctness 
of  the  edited  hourly  data,  since  there  are  no  restrictions  which 
hold  true  for  every  case.  Therefore  it  is  suggested  that,  after 
the  first  simulation  run,  the  option  to  receive  a  hard  copy  of  the 
input  data  should  be  chosen  as  described  in  the  section  RESULTS 
PRINTING  OPTIONS  in  order  to  check  the  accuracy  of  the  data  files. 

The  final  zone  unique  data  file  input  option  is 
appending  data  to  an  existing  file.  The  option  "A"  should  be 
chosen  with  the  existing  file  name.  The  program  will  then  display 
the  trunk  duct  distance  from  the  supply  fan  to  the  branch  duct  to 
each  zone  and  ask  for  the  number  of  the  new  zone.  The  data  for  a 
new  zone  will  be  inserted  in  the  file  between  thp  pvict-ing  zone 
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which  is  numbered  with  the  same  number  of  the  new  zone  and  the  one 


immediately  before  it.  For  example,  if  an  existing  file  contains 


data  for  four  zones  and  a  new  zone  tour  is  desired  to  be  entered) 


the  program  will  number  the  new  zone  as  four  and  the  existing  zone 
numbered  four  will  be  renumbered  as  five.  The  length  of  the 
trunk  duct  to  the  branch  of  the  new  zone  must  between  the  lengths 
for  the  existing  zones  three  and  four.  An  example  is  also 
displayed  on  the  screen.  Once  the  new  zone  number  is  entered)  the 
program  will  prompt  for  the  new  hourly  independent  data.  If  the 
trunk  duct  length  is  too  long  or  too  short)  the  program  will  state 


this)  then  request  that  the  number  of  the  new  zone  be  reentered 


and  ask  for  the  new  data.  Then,  the  zone  hourly  data  should  be 


input  as  described  earlier  in  this  section. 

After  twenty-four  hours  of  data  has  been  entered,  the 
program  will  ask  if  there  are  any  more  zones  to  be  added.  For 
additional  zones,  answer  "V"  and  follow  the  procedures  immediately 
preceding.  If  all  the  required  data  has  been  entered,  answer  "N" 
and  the  program  will  ask  if  data  editing  is  desired.  Any  data  in 
the  file,  including  the  zone  just  added,  can  be  edited  by  entering 


the  response  "Y"  and  following  the  procedures  on  editing  an 
existing  file  outlined  above. 


When  the  system  chosen  for  simulation  is  the  VAV  with 


induction  reheaters,  an  additional  file  must  be  used.  Since  the 


air  mixture  flow  rate  to  each  zone  is  allowed  to  vary  according  to 


the  space  load  requirement,  minimum  and  maximum  flow  rates  must  be 


entered  for  each  zone.  The  minimum  rate  was  entered  previously  in 


the  zone  unique  data  file,  so  only  the  maximum  rate  must  still  be 


entered.  Also,  the  maximum  flow  rate  through  the  induction  system 
must  be  input.  The  create,  edit,  append  and  use  options  are  all 


available  for  this  input.  The  flow  rate  values  must  be  entered  as 


non-negative  values  for  the  program  to  run  correctly.  The  amount 


of  data  input  is  restricted  to  the  number  of  zones  contained  in 
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the  zone  unique  data  file  above.  To  use  an  existing  file,  select 
the  "U"  option  and  enter  the  existing  file  name.  The  program  will 
expect  the  file  to  have  data  for  at  least  as  many  zones  as  are 
contained  in  the  zone  unique  data  file. 

The  program  will  read  a  file  which  contains  data  for  a 
greater  number  of  zones  than  that  which  is  included  in  the  zone 
unique  file  above,  but  it  will  only  read  up  to  the  number  of  zones 
required  for  simulation.  The  data  for  the  remaining  zones  may  be 
lost  during  subsequent  editing  or  appending  sessions. 

Procedures  for  editing  and  creating  this  file  are  the 
same  as  discussed  previously,  except  the  input/edit  is  limited  to 
the  correct  number  of  zones.  When  using  the  "A"  option  to  append 
an  existing  file,  the  number  of  zones  of  data  contained  in  the 
existing  file  must  also  be  specified.  The  program  will  then  ask 
for  input  of  additional  zones  of  data,  up  to  the  number  of  zones 
contained  in  the  zone  unique  data  file.  tditing  can  also  be 
accomplished  after  appending. 

FAN  CONTROL  OPTIONS 

The  last  input  options  concern  the  supply  and  return 
fans  used .  These  options  are  not  stored  in  a  permanent  file  for 
future  simulations  and  must  be  selected  prior  to  each  simulation. 
The  program  assumes  a  supply  fan  will  be  used.  Therefore,  it 
first  asks  if  the  fan  motor  is  in  the  air  stream.  A  "Y"  response 
will  produce  prompts  for  the  motor  and  fan  design  efficiencies.  A 
"N"  response  will  produce  only  a  prompt  for  the  design  fan 
efficiency.  In  the  case  where  the  motor  is  not  in  the  air  stream, 
the  program  will  set  the  motor  efficiency  to  100’/.,  Efficiencies 
are  input  as  values  of  between  zero  and  one.  An  input  value  of 
greater  than  one  will  require  reinput.  The  next  data  required  is 
the  total  pressure  drop  across  the  supply  fan.  The  program 
contains  no  check  for  accuracy  on  the  value  input.  Therefore,  a 


reinput  prompt  will  not  be  produced  if  a  negative  pressure  drop  is 
entered.  Next,  the  program  will  give  the  option  of  whether  or  not 
to  use  return  fan  in  the  simulation.  If  a  "Y"  response  is  given, 
the  same  input  as  was  required  for  the  supply  fan  will  be 
required.  When  a  response  of  "N"  is  given,  no  other  return  fan 
information  is  requested. 

Finally,  when  using  the  VAV  system,  the  method  of  fan 
control  must  be  selected.  The  program  will  display  the  four 
choices  described  in  the  section  FAN  CONTROL  and  prompt  for  entry 
of  the  number  to  the  left  of  the  method  desired.  Only  numbers  one 
through  four  will  be  recognized.  Then,  the  program  will  display 
the  coefficients  to  be  used  in  the  part  loading  equations.  The 
coefficients  for  a  cycling  fan  will  be  displayed  when  the  cycling 
system  is  being  simulated.  These  coefficients  can  be  changed  by 
selecting  letter  to  the  left  of  the  coefficient.  All  methods  of 
control  have  four  coefficients,  designated  "A"  through  "D" .  If  no 
changes  are  required,  an  input  of  "E"  must  be  entered.  The 
program  does  not  recognize  inputs  other  than  "A"  through  "E". 

RESULTS  PRINTING  OPTIONS 

Upon  completion  of  a  simulation  execution,  the  program 
will  orompt  for  the  name  of  the  permanent  file  in  which  the 
results  are  to  be  stored.  Ail  results,  including  the  summary  of 
simulation  input  and  the  output,  will  be  stored  to  this  permanent 
file  no  matter  what  hard  copy  printing  options  are  subsequently 
selected.  All  these  results  will  also  be  scrolled  on  the  screen, 
after  the  printing  options  are  selected. 

When  the  permanent  file  has  been  selected,  the  program 
will  then  give  the  option  of  printing  a  hard  copy  of  the  summary 
of  inputs,  output  results  and  all  permanent  input  files  used  in 
the  particular  simulation.  Examples  of  these  hard  copies  are 
shown  in  Appendix  A.  The  printing  options  are  contained  in  three 


successive  statements)  each  requiring  a  "Y”  or  "N"  response. 
Since  the  results  data  are  also  contained  in  a  permanent  file) 
they  can  be  printed  later  with  the  microcomputer’s  own  software. 

SUMMARY 

It  is  felt  that  the  input  routine  developed  for  use  with 
this  program  provides  all  instructions  required  for  successful 
data  input.  These  detailed  instructions  are  displayed  during 
input  for  every  simulation  executed.  If  a  prompt  keeps  repeating, 
even  after  an  option  has  been  entered)  the  user  should  check  to 
ensure  the  computer  keyboard  is  in  the  "CAPS  ON"  mode.  There  are 
numerous  checks  in  the  program  which  attempt  to  assure  correct 
entry  of  input  data,  but  it  is  again  suggested  that  the  input 
files  be  printed  after  the  first  simulation  to  check  the  data. 
Finally)  due  to  the  formats  used  for  reading  the  input  data,  if  a 
character  ti.e.  "a",  "B" ,  "F",  etc.)  value  is  entered  where  a 
numerical  value  is  required,  the  program  execution  will  terminate, 
In  this  case,  reinput  of  much  of  the  data  may  be  required. 
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APPENDIX  D 

PROGRAM  SOURCE  CODE 
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SNOFLOATCAL  LS 
*  STORAGE :  2 

C=========THE  FOLLOWING  IS  A  TWENTY  FOUR  HOUR  SIMULATION  0F========= 

C=========AN  HVAC  SYSTEM  OPERATION  IT  INCLUDES  OPTIONS  70========= 

C=========VARY  THE  SYSTEM  FROM  A  CONSTANT  VOLUME  T ERM I N A L  =  =  =  =  =====  = = 

C=========REHEAT  SYSTEM  TO  A  VARIABLE  VOLUME  WITH  !NOUCTION========= 

C=========P£HEAT  STSTEN  TO  A  CTCLINS  (SINGLE  ZONE)  SYSTEM  =  =  =  =  =  =  =  =  =  = 

C=========THERE  IS  THE  CHOICE  OF  THREE  METHODS  OF  CONTROL  0F======== 

C=========THE  LEAVING  COIL  AIR  TEMPERATURE  (FILED  SET  POI NT , ======== 

C=========ZONE  CONTROLLED,  Ok  OUTSIDE  AIR  CONTROLLED)  THERE======= 

C=========ARE  ALSO  THREE  METHODS  OF  ECONOMIZER  CONTROL  (N0========== 

C=========ECONONI ZER ,  DRY  BULB  AND  ENTHALPY  CONTROLLED) .============ 

C=========THE  SUPPLY  ANO  OPTIONAL  RETURN  FANS  CAN  HAVE  CONST ANT= === = 

C=========OR  VARIABLE  SPEED  NOTORS,  INLET  DANPERS,  D I SCH AR 6E ======= = 

C=========DANPERS ,  OR  CAN  BE  SIMULATED  AS  CYCL I NG . ================== 

C  =  =  =  =  =  =  =  ==VHEREVER  POSSIBLE,  DEFAULT  VALUES  HAVE  BEEN  I NC L U DE D  =  =  =  =  =  = 
C=========WITH  THE  OPTION  FOR  CHANGE  TO  FIT  THE  S I TUATION. ========== 

C=========THE  OUTPUTS  FROM  THIS  PROGRAM  INCLUDE  LOADS  ON  THE======== 

C=========COOL ING  COILS,  PREHEATER,  ZONE  REHEATERS,  LEAVING========= 

C=========COIL  AIR  CONDITIONS,  ZONE  PRINARY  AND  SECONDARY  AIR======= 

C=========FLOW  RATES,  AND  THE  PERCENTAGE  OF  OUTSIDE  AIR  USED  ======= 

C=========(WHEN  THE  CYCLING  SYSTEM  IS  SIMULATED,  THE  RUNNING======== 

C=========T INE  PER  HOUR  IS  ALSO  OUTPUT  1============================ 

C=========BOTH  INPUT  AND  OUTPUT  FILES  CAN  BE  PRINTED,  IF  DESIRED  === 

C=========THIS  PROGRAM  WAS  DEVELOPED  BY  CAPTAIN  MICHAEL  A  REARDON: = 

C=========UNDEP  THE  TECHN'CAL  DIRECTION  OF  DP  JERDLD  W  JONES, ===== 

C=========PROFESSOR,  MECHANICAL  ENGINEERING  DEPARTMENT,  THE========= 

C  =  =  =  =  =  =  =  =  =  UNI VERSI TY  OF  TEXAS  AT  AUSTIN  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  = 

PROGRAM  RVAC 

C 

IMPLICIT  REAL  ( A-H , L , P-Z ) 

CHARACTEP  YM1 , YM2 , YN3 , FCHOOZ , YN4 , YM5 , YN6 . FCHUZZ , FCHUZS , FCHUZM , 

♦  ICT 

CHARACTER*!*  FNAME , FZNAME , SCHDLE  .MAXCFM , OUTF I LE 
CHARACTERED  FANTTP 
DIMENSION  RUNTME(24) 

CONM0N/AAAAA/CFM(50,Z4),CFM?'*n.?l!,N,JX, IKOA.ICNTRl, ISYSTM, 
♦MIN,MN,AO(50),ADZ(50!,ACFM(5OI,ACFM2(5D),FRHfi(24),FRKRA 
COMMCN/BBBBB/DTDI 50) ,DTDT(50S,DTDZ(5D),V,VD,l(50),LZ(50),TPL, 

♦  TO ( 50 ) , TOO , UD 
COMMON /CCCCC  TQDUCT 

COMMON/ODDOO/CPMMI X ,CPMLCC,CPMR,CPA,CPV,CPL,HGLCC,HLCC,KOA,HRA 
COMMONIEEEEE  IP  I ,TSUPZ(50I,IFLAG? 

COMMON ( FFFFF /SPVA (50 1 ,UCZ,AZ(50),OLGZ(50,24),TZ(50,24),TOA(24) 


_y->  -j.  ->-> 
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♦ , TWBL  24) , FRQLGT , TPl  t ,TPLA,FLUXW,QPlW(50) , AMXECON 
COMMON  /6GG6&/QSZ  (50,24),QLZ(50,24),TSUPB2(50),DTBH(50),QRHZ(50,24) 
COMMON/HHKNH/RH(24) ,PT0A(24),TMIX,SPVZ(50) , WOA 5 . WO A , WL CC ( 2 4 ) , 

+WZ (50), WB , WM I X ,  IF1AB1,TLCC(24*,TR<24),  IWCHU ,SPVSD,PTOAM, HG , 

♦  TICCF ,  I FLA62 , IFLAG3 , 1 F  L  AB4 ,  STOA  ( 150) ,  ST  ICC'  150) ,  TICCA  (24) 

COMMON  /  lllll/SFHP,RFHP,TPS,TPR,SFANn,RFANn,  SHOT  «,RMOTn,DTSF, 
♦0TPF,SrPLD(4) .BFP10C4) .AMXTLCC 
COMMON/ JJJJJ/0CCK24) ,  QPH  ( 24  > ,  FRDL 

COMMON/URKKR /CFMIMX ( 50 ) <  CFMZMN (50,24  ) ,CFMZIM(50),CFMZI(50,24), 
iTSUPZ  I  (50) ,  SPV I  (50) ,  SPVS  ( SO ) ,  I  FLAGS ,  IFLAG6,  IFLA67 , 1  FLAG!  (50) 


■ sss: I N I T I AL  CONSTANT  DEFAULT  VALUES=  =  r  =  =  = 


WR  I  TE  ( A , 373) 

FORMAT ( / / ,22X, '  I N SUP E  THE  KEYBOARD  IS  IN  THE',/, 272, 

♦  '■CAPS  LOCK  ON"  MODE  ' ) 

PU4IATANM.0) 

TO0=55 
K  CHNGE  &  0 

CPA=0  236585 
CPVrO  448833 
CPU!  .0007(4 
V=IOOG . 

V0  =  500 
TPL  A  =  8 1 
1/0  =  0  20000 
UCZ  =  0  3 
FRQLGT  =  0  6 
FRDL=0  05 
AMXEC0N=62  5 
AMXTLCC=68 .0 

WR  ITE (*,'(// /A/ )') '  THE  DEFAULT  VALUES  FOR  CONSTANTS  ARE  ' 
WRITE/1,279)  CPA 

FORMAT ( 3X , '  (1)  SPECIFIC  HEAT  OF  CRT  AIRTBTU/LBM-oF) ' , I  IK, 

♦FI2  7) 

WR I  TELA , 280)  CPV 

FORMAT ( 3X , '  (2)  SPECIFIC  HEAT  OF  WATER  V A P OR t B T U / L BM - o F ) ' , 7X , 

♦F12  7) 

WR I TE  LA , 28 1 )  CPL 

FORMAT  <  3  X , '  (3)  SPECIFIC  HEAT  OF  LIQUID  WATER(BTU/L6M-oF) ' , 

♦8X.FI2  7) 

WR I TE ( A ,  282  )  V 

FORMAT ( 3 X , '  (41  MAXIMUM  TRUNK  DUCT  VELOC I TT (FT /M I N! ' , 1 2X , 

♦  F 12  7) 


wow 
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=:::=s=OPTION  TO  CHANGE  CONSTANT  DEFAULT  VALUES- 


VRITE<1,283>  VO 

F ORMAT ( 3X , '  (S)  MAXIMUM  TONE  BRANCH  DUCT  VEIOC I TT ( f T /N I N) ' , 

♦  6X , F12 . 7  > 

VRITE(t,284)  TPLA 

FORMAT < 3X , '  (6)  ASSUMED  PLENUM  TEMPERATURE (oF) \I7X,F 12 . T) 

VR  I  TE ( t , 285)  UD 

F ORMAT ( 3X , '  (7)  DUCT  *U'  « ITU / SQF T -*F -HR ) ' , 22X,F 12 . T ) 

WR I TE (* , 286 )  UC2 

FORMAT ( 3X , '  (8)  CEILING  "U*  (BTU / SQF T -o F -HR ) ' , l»X,F 12 . 7) 

VRI TE (1 , 2871  FRQLGT 

FORMAT ( 3 X , '  (8)  FRACTION  OF  LIGHTING  ENERGT  ENTERING  THE  PL', 

♦  'ENI/M'.F  12. 7) 

WR I TE (> , 383 )  AMXECON 

FORMAT C 3X , '  (ID!  ORT  BULB  ECONOMIZER  SHUT  OFF  TEMPERATURElof ) ' 
♦ .3X.F12  7) 

VRITE(I,277)  FRDL 

FORMAT  ( 3X , '  (II)  DUCT  LEAKAGE  («  OF  TOTAL  CFM  ACROSS  COIIMOO)' 
♦ .3X.F12  7) 

VR I TE(t , 384)  AMXTLCC 

F  ORMAT ( 3  X , '  (12)  MAXIMUM  LEAVING  COIL  AIR  TEMPERATURE (oF5 ' 
t,7X,FI2  1,1111) 


WRITE (t,t)  'IF  ANT  OF  THESE  VALUES  NEED  TO  BE  CHANGED,  T7PE' 
WRITEtt,  MAD')  '  THE  NUMBER  TO  THE  LEFT,  IF  THEY  ARE  OXAT  TTPE  ’9 
♦  91  ' 

READ ! * , * )  ICHK 
IFdCHF  EQ  99)  GOTO  103 
I F ( ICHK  L T . 1  .OR  ICHK  GT  12)  THEN 
VR I TE( F , 250 ) 

FORMAT!/,  1,1,1, 1,1,1,'  UNRECONI7ABIE  ENTRT-TRT  AGAIN',/) 

GOTO  104 
END  IF 


=CHECK  TO  SEE  IF  ANT  CONSTANTS  HAVE  BEEN  CHANGED: 


RCHMGErUKCHMGE 

WRITE! • ,'(/// /A) )' )  '  ENTER  DESIRED  VALUE  FOR  THE  CONSTANT  ' 

IFdCHF.EQ  1 )  READ!!, I)  CPA 

IFdCHR  EQ.2)  READ!*,*)  CPV 

IFdCHF.EQ  3)  READ(t,«)  CPL 

IFdCHF  EQ.4)  REACH,  F)  V 

IFdCHF.EQ  5)  READ ( t , I )  VD 

IFdCHF  EQ  8)  READ! I, I )  TPLA 

IFdCHF.EQ  7)  READ(F,«)  UO 

IFdCHF.EQ  8)  REAO(«,F)  UCZ 

IFdCHF.EQ .9)  READ?*,*)  FRQLGT 


VV-V.-.W 


WOT 


vo.’v  vv  >V>%->S.7V 


SWJrJ 


tiff* 


IFdCHK.EQ  10)  READ ( t , I )  AH X E CON 
IF( ICHK . EQ .11)  READ ( t ,  t }  FROL 
IF1ICHX.E0.12)  READ ( * , t )  AMXTLCC 
SOTO  104 
193  CONTINUE 

I FIFRDt  LT . 0.9000  1  )  FRDL=9.0 

=  =  :  =  .-  =  =  =  =  ==z=SY$TEM  TYPE  CHOICE~==z=z====  =  ==~=z=zz  =  r  =  z  =  =  =  z  =  =  =  =  z 
VR 1 TE (t , 290 ! 

290  FORMAT! / f 1 X , 'ENTER  THE  TYPE  OF  SYSTEM  TO  BE 

♦  'SIMULATED  BT  SELECT  INC-'  ,/,  IX,  'THE  NUMBER  TO  THE  LEFT  OF  THE 

♦  '  SYSTEM  DESIRED. 5X,'(1>  TERMINAL  REHEAT’,/, 

♦  5 X , ' (2)  VARIABLE  AIR  VOLUME  WITH  INDUCTION  REHEATERS',/, 

♦  5X, ' f 3)  CTCLINS  SYSTEM',/,/) 

lie  WRITE (t, ' (A\ )' )  '  YOUR  CHOICE ( 1/2/31’  ' 

READ!t,t]  ISYSTN 

1F(  (1SYSTM.LT. 1) .CR . ( ISYSTM.GT.3))  THEN 
WR I TE( 1 , 250 ) 

WRITE (1,290) 

GOTO  116 
ENDIF 

zzzzzzzzzzCCNTROL  METHOD  CKO!CE*:::::::::*:::zzzzzzzzzzzzzzzzzzzz 
144  WR  I  TE  (• ,  29 1 ) 

291  FORMAT!/, /,/,/,/,/, IX, 'ENTER  THE  TYPE  OF  CONTROL  METHOD  TO  B 

♦  'E  USED',/, IT, 'BY  SELECTING  THE  NUMBER  TO  THE  LEFT  OF  THE  ME 
♦ ' THOD  DESIRED  ',/,/,  IX, 'THE  TEMPERATURE  LEAVING  THE  COOLING 

+ '  CC I L  WILL  BE , ' ,  /  ,5X, ' ( I )  FIXED  SET  POINT',/, 

♦5X , ' (2 )  ZONE  CONTROLLED',/, 

♦  5 X , ' (3)  OUTSIDE  AIR  (DRY  BULB)  CONTROLLED',/,/) 

117  WR I TE  (A , '  ( A\ ) ' )  '  YOUR  CHOI  CE!  t/2/3)  ’  ' 

READIt.t)  ICNTRL 

IF ( I ICNTRL . LT. 1 )  OR  (ICNTRL  ST. 3))  THEN 
WR I TE ( t , 250  ) 

WR I TE( A ,  29 1 ) 

GOTO  117 

ELSE  IF! I CNTRL  EQ  I )  THEN 

=  ssssss==  INPUT  OF  LEAVING  COIL  TEMPERATURE  FOR  F I XED===z==z==rz== 
zzzzzzzzzTEMPERATURE  CONTROL  NETHODzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz 

WRITE! A, ' ( // / /  /A) ’ )  '  ENTER  THE  COOLING  COIL  LEAVING  AIR  ' 
WRITE! t ,' (AM ' )  '  TEMPERATURE! cF>  TO  BE  FIXED---  ' 


'V  »v 


fiEADd ,*)  TLCCF 
ELSElFdCNTRL.EO  3)  THEN 
143  WRITE(t,296) 

C 

C=«*=:=«INPUT  OF  LEAVING  COIL  TEMPERATURE  FOP  OUTS  I  DE====:==:x 
:=sxs4 IP  CONTflOt LED  CONTROL  HETHOD=========:===::==::====:= 


FORMA T ( /,/,/,/,/, IX, 'TO  USE  THIS  CONTROL  METHOD.  4  SCHEDULE' 

♦  OF  COOLING',  /, IX, 'COIL  LEAVING  TEMPE  R  AT  UR  ES  ( T  L  CC )  VERSUS 

♦  'OUTSIDE  ORT',/,  IX, 'BULB  TEMP ERATUR ES C TOA )  MUST  BE  ENTERED  ' , 

♦  / ,  / , SX , '  DO  TOU  HAVE  THIS  SCHEDULE  FOR  THE  RANGE  OF  OUTSIDE', 

♦  / ,  5  X , ' A I R  TEMPERATURES  WHICH  WILL  BE  ENCOUNTERED ( T /N ) *  \\) 

READ!*, '(ADM  TNI 

IFITNI  NE  'T'  AND  TNI  NE .  'NM  60T0  143 
IF(YNl.EQ.'N')  GOTO  144 


====:OUTSIOE  AIR  CONTROL  SCHEDULE  INPUT/ED  I  T::  = 


WR I TE ( < . 28  8  ) 

READ ( t , ' ( A I ) ' )  FCHUZS 
IFIFCHUZS  EO  'EM  GOTO  148 

IFIFCHUZS  EQ  'CM  GOTO  149 

IFIFCHUZS  EQ  ' UM  GOTO  150 

WR  I  TE ( * , 2  SO ) 

GOTO  147 

NFLAGxI 
WRITE!*, 252) 

REAP!  1 , 253  )  SCHPLE 
GOTO  151 

NFLAG  =  2 
WRITE!*, 254) 

READ!*, 253  )  SCHOLE 
GOTO  15! 

NFLAG=3 
WRITE!*, 255  ) 

READ!*, 253)  SCHCLE 

IF(NFIAG.EQ.Z)  THEN 

OPEN ( 5, F I LE  =  SCHDLE, FORM: 'FORMATTED '.STATUS:' NEW '! 

WRITE!*, 297) 

FORMAT! / IX . 'ENTER  THE  OUTSIDE  DRT  BULB  TEMPER' 
♦'ATURE(oF)  AND' , / , 1 X, 'CORRESPONDING  LEAVING  COIL  TEMPERATURE' 
♦  MoF)  ',/,  IX,  'ENTER  *999, 999*  IF  SCHEDULE  IS  COMPLETE.',/,/) 
NSTEP:  1 

READ!*,*)  STOA(NSTEP) ,STtCC(NSTEP ) 


rrci 


IF(STOAINST£P).EQ. 999.0)  GOTO  146 

N$TEP=NST£P*I 

GOTO  145 


DO  1  M.KSTEP 

WRITEI5,  t)  STOAt  I ) . STLCCU ) 

REWIND  5 
CLOSE (5) 

WRITE!*,  '{////At)')  '  DO  TOD  WANT  TO  EDIT  THIS  DATAIT/N)  ? 
READ!*, '(ADM  TN2 

IE (TN2 . N£  'T'.ANO  TN2  NE.'N')  GOTO  151 
IFITN2  EQ.'T'l  SOTO  153 
SOTO  164 

ELSEIF1NFLAG £0.3)  THEN 

OPEN  ( 5 ,  F I  IE  :SCHDLE  ,FORMs' FORMAT  TED ' ,  STATUS: 'OlO') 

REWIND  5 
CLOSE (5) 

SOTO  164 

EISEIF1NFIAG  EO  1)  THEN 
SOTO  153 
ENEIF 

0PENI5, FI LE-SCHDLE, FORN= 'FORNATTED', STATUS; 'CIO') 

REWIND  5 
NSTEP:  I 

READ! 5, * '  STOA INSTEP), STICCI NS TE?) 

I F ISTOAINSTEP ) . EQ  9990)  THEN 
REWIND  5 
GOTO  155 
END  IF 

NSTEPsNSTEP* 1 
GOTO  154 

CONTINUE 

00  2  I  =  1  ,NSTEP ,49 
WRI TEI*, 29!) 

FORNAT (I,/,1X,3I3X,'P0INT',3X,'T0A',4X,'TLCC'),I) 

I  P:  I 

jp=uie 
RP--I*32 
00  3  J  =  1 , 16 
IPP=IP*(J-I! 

JPP= JP4 ( J-1 ) 

XPPsRPflJ-1) 

IFIIPP  GE  NSTEP !  GOTO  158 


■si 


*i 


-»l  ,1  al  4|  |9t  1»>  4l«  4>a  |  II 


ll*  lat  |.f  1 


.LMa1.!*’  I 

VJ 


! F( JPP  SE.NSTEP)  SOTO  157 
IFdPP  SE  NSTEP)  SOTO  156 

WR I TE t * , 299 )  I PP , STOA ( I PP ) , ST LCC ( I PP) , JPP , STOAT JPP) , 

♦STICC!  JPP)  ,XPP, STOA UPP) , STtCC (XPP ) 

FORMAT (2X,3(3X,I3,2(2X,F6.2)!) 

60T0  156 

WR I TE ( t , 300 )  IPP.STOAt IPP) ,STLCC( IPP> , JPP, STOAT JPP), 

♦STICC! JPP) 

FORMAT ( 2X , 2 (3X , I3,2(2X,F62))) 

SOTO  158 

WR I TE ( > . 30 1 )  I PP, STOA ( IPP) , ST  LOCI IPP) 

FORMAT ( 5X , I3,2(2X,F6.2)) 

CONTINUE 

CONTINUE 

WR  f  TE ( * ,  302 ) 

FORMAT ( IX, 'DO  YOU  WANT  TO  EDIT  ANT  OF  THESE  POINTSIT/N)?  ' 

♦  ,T) 

READ!», MAI)')  TN3 

IF(YN3  HE  'T'  AM0.YN3  NE  'N' )  SOTO  159 
IFITN3  EQ  'NM  60T0  162 

WR ITE(t,  MAT ) ' ) '  WHICH  POINT* (ENTER  NUMBER  OF  THE  POINT)  ' 

RE  AD ( * , * )  IPPICA 
I LAR6E=MIN0(KPP,NSTEP-1  > 

IF( ( IPP 1CK . LT  IP)  OR  ( IPPICR  ST  I  LAPSE) )  THEN 
WR I TE( t ,  303)  IP , I  LARGE 

FORMAT!/, IX, 'POINT  TO  BE  EOITTED  BUST  BE  BETWEEN' , IX , 1 3 , 1 X, ' 

♦  AND', IX, 13,'  ',/) 

GOTO  159 
ELSE 

WRITE! t, M  / /AT )') '  ENTER  NEW  TOACoF)  AND  NEW  TLCCf oF) 
READ'!,!)  STOA! IPPICK) ,STLCC( IPPICN) 

SOTO  161 
ENDIF 
CONTINUE 
CONTINUE 

WRITE!!, M///AT)')'  00  TOU  WANT  TO  EDIT  THIS  DATA  ASAINIT/N) >  ' 
READ!  • , '( A  1 ) ' )  TN5 

I F ( YN 5  NE .  M' . AND  TN5  NE . 'N' )  SOTO  163 
IF(TN5  EQ  MM  SOTO  155 
DO  4  1  =  1 ,  N  S  T  E  P 
WR I TE! 5 , •  I  STOA! I )  ,STICC!  I ! 

REWINO  5 
C10SEI5) 


I 


115 


C 

C=========READS  SCHEDULE  INPUT  FILE  TO  MAIN  PROGRAM  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  = 

C 

164  CONTINUE 
IFdCNTRL.EQ  3)  THEN 

OPENI5 ,F I LE=SCHDLE, FORN= 'FORNATTED' , STATUS: 'OLD') 

NSTEP--I 

165  REA0(5,A)  STOA(HSTEP) , ST  ICC (NST E P ) 

I FISTOA(NSTEP) . EQ .93901  THEN 

REWIND  5 
CLOSE(S) 

ELSE 

NSTEP=NSTEPtl 
GOTO  165 
ENOIF 
END  IF 
C 

C=  =  =  =  =  =  =  =  = INPUT  OF  NININUN  FRACTION  OF  OUTSIDE  AIR  REOU I RED========= 

C 

111  WR I  TEC*. 292 ) 

292  FORNATt/./././././JX, 'ENTER  THE  NININUN  F  R  ACT  I  ON  ( OU  T  S I DE  AIR' 
♦'  VOLUNE/TOTAL  AIR  VOLUME ) ' , IX, 'OF  OUTSIDE  AIR  WHICH  CAN  ', 

♦  'BE  USED  (0.0-1  «)»  \\) 

READ! * , * )  PTOAN 

IFtlPTOAN  LT  0  01  OR . (PTOAN  6T  1.01)  THEN 
WRITE!*, 250) 

GOTO  III 
ENOIF 
C 

C=========ECONONI ZER  CONTROL  CH01CE================================= 

C 

WR  I TE ( * ,  293  ) 

293  FORNAT1/, /,/,/,/, IX, 'ENTER  THE  NETHOD  TO  BE  USED  FOR  OUTSIDE  ' 
♦ ,  / ,  IX ,  'A  I R  CONTROL.',/) 

WR  I  TE  <  > ,  294 )  PTOAN 

294  FORNATI4X , '  ( I )  NONE,  THE  FRACTION  OF  OUTSIDE  AIR  WILL',/, 

♦9X, 'ALWAYS  RENAIN  AT',F5  2,/, 

+4X, '  (2)  OUTSIOE  DRY  BULB  TEMPERATURE  CONTROLLED',/, 

♦4X,'I3>  ENTHALPY  CONTROLLED',/,/) 

C 

118  WRITE!*,  MAD')  '  YOUR  CHOICE  (1/2/3)?  ' 

READ!*,*)  INOA 

IFKINOA  IT.  I). OR.  (INOA  GT. 3!)  THEN 
WRITE!*,  250  ) 

WRITE!*, 293) 

GOTO  116 


'HOURLY  WEATHER  DATA  AND  DATA  INDEPENDENT  OF  ZONE= 


WRITE!*, 314) 

FORNAT ( /,/,/,/,/,/, IX , 'THE  NEXT  INPUTS  WILL  8E  FOR  HOURLY 
♦'OUTSIDE  DRY' , I , IX, 'BULB  AND  WET  BULB  TEMPERATURES,  PLENUM 
♦'WALL  LOADS,  AMO' ,/, IX. 'RELATIVE  HUMIDITY  LEAVING  THE  COILS  ' 
♦,/,/,/,/) 

WRITE!*, 257)  TPLA 

FORMAT ( 5X , 'NOTE:  THE  PLENUM  WALL  LOAD  SHOULD  BE  BASED  ON',/, 

♦  5 X , 'AN  ASSUMED  PLENUM  TEMPERATURE  OF' ,F7  2, ' (oF)  ',/,/) 
WR!TE(t,288) 

FORMAT;/,'  00  YOU  WISH  TO  EOIT  AN  EXISTING  DATA  F I LE 7 < TYPE  E)' 
♦,/,'  CREATE  A  NEW  DATA  F! LE* (TYPE  C),  OR', 

♦/,'  USE  DATA  FROM  AN  EXISTING  FILEITYPE  U)>  ',)) 

READ! * ,251)  FCHOOZ 
FORMAT ( A) ) 

I F (FCHOOZ . EO  ' E ' )  GOTO  107 
I F ( FCHOOZ . EO  ' C ' )  GOTO  IDS 
t F ( FCHOOZ  EQ  'U' )  GOTO  109 
WRITE;*, 250) 

GOTO  105 


JFLAG't 
WRITE;*, 252) 

FORMAT;/,/,'  ENTER  "ORI  YE  :F  I IENANE .  EXT"  OF  FILE  TO  BE 
♦  'EOITTED  ',U 
READ; i , 253)  FNAME 
FORMAT/A  11 ) 

GOTO  110 


JFLAG'2 
WRITE;*, 251) 

format;/,/,'  enter  "drivefilename.ext' 

♦'CREATED  \1) 

READ;*, 253  )  FNAME 
GOTO  110 


OF  FILE  TO  BE  ' 


JFLAG=3 

WRITE(»,255) 

FORMAT;/,//  ENTER  "DRIVEFILENAME.EXT"  OF  FILE  TO  BE 
♦  'USED  ' ,  \ ) 

READ; 1 ,253)  FNAME 

IFIJFLAG  EQ.2)  THEN 


'INPUT  OF  ASSUMED  RELATIVE  HUMIDITY  LEAVING  THE  COILS' 


I, 


VRITEd  ,3 15 1 

FORMAT ( / , / , IX , 'FOR  THE  RELATIVE  HUMIDITY  LEAVING  THE  COILS', 
♦/ , IX, 'TOD  HAVE  THE  CHOICE  OF  EITHER  INPUTTING  HOURLY  VALUES',/ 
I*, 'OR  ENTERING  A  CONSTANT  VALUE  TO  BE  USED  FOR  THE  ENTIRE',/ 
♦,1X,'24  HOUR  PERIOD  OF  SIMULATION. ' ,  / ,  / ) 

WR I TE ( t , 3 1 6 ) 

FORMAT  I IX, 'FOR  A  CONSTANT  RELATIVE  HUMIDITY,  ENTER  THE  VALUE 
IX, ' CHOSEN (0.0- 1.0)', 

♦/ , IX , 'FOR  A  VARIABLE  RELATIVE  HUMIDITY,  ENTER  A  VALUE  GREATER ' 
♦ , / , IX , 'THAN  1.0.  ',11 

READ ( t , t )  RHPICX 
If (RHP  ICR . LT . 0 . 0)  THEN 
VRITEd, 250) 

60T0  180 

ELSEIFHRHPICX.be.  0.0)  AND  (RHPICX  LE.  1 . 0!  I  THEN 
DO  31  1  =  1 ,24 
RH ( I  URHP ICX 
I RHF  L AG  =  0 
ELSE 

IRHFLAS= I 
ENDIF 

OPEN(7,FILE=FNAME,FORM=' FORMATTED ' , STATUS= ' NEW' ) 

VRITEd, 317) 

FORNATf/,/, IX,  'ENTER  THE  OUTSIDE  DRY  BULB  TEMPERATURE! oF) , ‘ , 
♦  / ,  IX,  'THE  OUTSIOE  VET  BULB  TEMPER A  TUB E ( o F J , ' ) 

IF( IRHFLAG  EQ  0)  THEN 

VRITEd,!)  'AND  THE  PLENUM  WALL  LOADIBTU/HR)  FOR  ' 

ELSE 

WRITE! A, 318) 

FORMAT (IX, 'THE  PLENUM  WALL  LOAD ( BTU / HR >  AND  RELATIVE',/ 
i, IX, 'HUMIDITY  FCR  'I 
ENDIF 

DO  0  1=1,24 
VRITEd, 250  )  1, 1-  1  , 1 

FORMAT ( / , IX , 'HOUR  ' ,  1 2 , '  ( ' ,  1 2 , ' : 00- ' ,  1 2 , ' : 00)  ') 

I F ( IRHFLAG  EQ  0)  THEN 
REAOdd)  TO  A  ( I )  ,TV8(  I )  ,QPLV(  | ) 

ELSE 

READdd)  TOA ( I ) ,TV8(  I ) ,QPLVI  I )  ,RH(  I ) 

ENDIF 

VRITE(7,t)  TOA ( I ) ,TVB( 1 ) ,QPLV( 1 1 , RH ( I ) 

REVIND  7 
CL0SEI7) 

VRITEd,  ’(/'AU'I  '  00  YOU  WANT  TO  EDIT  THIS  DATAIY/N)  >  ' 

READY t , 25 1 )  YN3 

IFIYN3  NE.'Y'  AND  TN3  NE  'N’>  GOTO  113 
IFIYN3  EQ.'Y'I  6OT0  112 


EISEIFI JFLAB.EQ.3)  THEN 

0PEN(7,F I L£=FNANE , FORM= 'FORMATTED' ,STATUS=  'OLD' ) 

REWIND  7 
CIOSEI7) 

GOT  0  114 
C 

ELSEIFIJFLAG.EQ. I)  THEN 
SOTO  112 
ENDIF 
C 

112  OPEN  ( 7 ,  F I  LE  =  FHAKE,FORt4='  FORMATTED ' ,  ST  AT  U  S= '  OLD ' ) 

REWIND  7 

115  WRITE  It , M / /A) ' )  '  ENTER  THE  HOUR  OF  DATA  TO  BE  EDI  TTEDt  1-24 ) ' 
WRITE  tt ,'  (AU ' )  '  OR  "55"  IF  EDITTNG  IS  COMPLETE.  ' 

READ'4,1)  I  HR 
IFdHR.Efl.J9l  THEN 
CLOSE!?) 

GOTO  114 
ENDIF 

IF! IHR . IT . 1  .OR.  IHR.GT .24)  THEN 
WRITE(l,250) 

GOTO  115 
ENDIF 

DO  7  1=1,24 

7  BEAD ! 7 , * )  TOA ( I ) , TW8 ( I ) , QPtW! I ! ,RH ! I ) 

REWIND  7 

WRITE (I, 259)  IHR, TOA (IHR), TWB! IHR),flPLWIIHR),RH(IHR) 

259  FORMAT!  / EXISTING  DATA  FOR  HOUR  \l2,/,/,5X,'  DRT  BULB', 

♦  '  TENPERATUREUF)  ' ,F II . 2, / , 5X, '  WET  BULB  TEMPERATURE (oF )  ', 

+P 1 1  2 , / , 5X , '  PLENUN  WALL  LOADtBTU/HR I  ' , F 1 1  2,/,5X,'  RELATIVE' 

♦  , '  HUNIDlTTIt/ IOO)  ’ , F!  I  2) 

WRITE!* ,258!  IHR 

258  FORMAT!/!,'  ENTER  NEW  DATA  FOR  HOUR  ',I2,2X,!> 

READ! I, t)  TO A ( I H H ) , TWB ( IHRJ.QPLW! IHR) ,BH( IHR) 

00  8  1=1,24 

8  WR I T E ( 7 , * )  TOA! I ) , TWB! I ) , QPLW! I ) ,RH( I ) 

CLOSE (7) 

60T0  112 
C 

114  CONTINUE 
C 

C=========INPUT  OF  ZONE  UNIQUE  DATA ( FOR  VAV  SYSTEMS,  THE  CFN======== 

C===  =  =  =  =  ==ENTERED  WILL  BE  THE  MINIMUM  CFN  REQUIREO================== 

C 

119  WR ITE(t ,'(/// //A' )') '  THE  NEXT  INPUTS  WILL  BE  ZONE  UNIQUE  DATA.' 
WRITEd.l)  'DO  TOU  WISH  TO  EDIT  AN  EXISTING  DATA  FIIEMTTPE  E)' 


wn  >w  nr.*j 


WR I T  E ( t , t )  'CREATE  A  NEW  DATA  F I  IE  ? ( TYPE  C)' 

WRITE!*,*)  'USE  AN  EXISTING  DATA  FILE’ITYPE  I/)' 

I F ( ISTSTN. EQ. 3)  60T0  167 

WRITE!*, *)'ADD  ADDITIONAL  ZONES  TO  AN  EXISTING  DATA  F I  IE*  ( TYPE  A)' 
WRITE!!, 347) 

FORMAT (1,1, / ,5X, 'NOTE :  EXISTING  FILES  CAN  BE  EDITTED  WITH  THE' 

♦ , / , 5X ,  'USE  OF  AN  EDITOR  PROGRAM  DELETING  DATA  FOR  AN  ENTIRE' 

♦  , MX, 'ZONE  CAN  ONLY  BE  DONE  WITH  AN  EDITOR  PROGRAM.',/,/,/) 
WRITE!!, '(/AL)')  '  TOUR  CHOICE?  ' 

READ ( l, 25 1 )  FCHU2Z 
I FIFCHUZZ .  EQ.  'E ' !  GOTO  120 
IF(FCHUZZ.EQ.'C')  SOTO  121 
I  FIFCH'JZZ.  EQ.  'U'l  GOTO  122 
1 F ( FCHUZZ . EQ . ' A ' .AND . ISTSTN  NE .3)  GOTO  123 
IFCFCHUZZ  EQ  'A'  AND  ISTSTI4  EQ  3)  WRITE(i,304  ) 

WR I TE ( * , 250) 

GOTO  115 

AFLAG= I 
WRITE!!, 252) 

READ!!, 253)  FZNAME 
60T0  125 

XFLAGs2 
WR  I  TE(1 , 254) 

READ! t , 253)  FZNAME 
GOTO  124 

K  F  L  AG  =  3 
WRITE!! , 255  ) 

READ(«,253!  FZNAME 
6OT0  124 

KFLAGiA 
WRITE!!, 260) 

FORMAT!/,/,'  ENTER  "DR  I VE .  F I LENAME .  EXT"  OF  FILE  TO  BE  ADDED ' 

♦  ,'  TO  \\) 

READ!!, 253)  FZNAME 
60T0  124 

IFIIFLAG.EQ  2)  THEN 

OPEN! 6, F I LE=FZNAME, FORM: 'FORMATTED' , STATUS: 'NEW' ) 

IF! ISTSTN. EQ  3)  THEN 
WRITE!*,  30*' 

FORMAT!/, /,/,/, IX, 'SYSTEM  WILL  BE  SIMULATED  AS  SINGLE  ZON' 

♦  ,'E  ',/,  IX,  'THEREFORE,  DATA  FOR  ONLY  ONE  ZONE  CAN  BE  ENTERED  ' 

♦ , / , IX , 'FOR  MULTIPLE  DIFFUSERS  IN  THE  ZONE,  THE  AVERAGE  TBUNN ' , 

♦/, IX, 'LENGTH  AND  LONGEST  BRANCH  LENGTH  SHOULD  BE  ENTERED  ',111 


120 


60T0  168 
END!  F 

WRITE!*, '(/A)')'  ZONES  ARE  TO  BE  NUMBERED / DAT  A  ENTERED  IN  ORDER' 
WRITE!*, *>  'Of  INCREASING  0 { STANCE  FROM  SUPPLY  FAN  TO  ZONE  ' 
WRITE  It,*)  ' BRANCH  DUCT.' 

MR  I  TEC  a , 38  D ) 

380  FORMAT ! IX ,  'FOR  MULTIPLE  DIFFUSERS  IN  THE  ZONE,  THE  AVERAGE  ' 

♦  .  'TRUNK' , / , IX,  'LENGTH  AND  LONGEST  BRANCH  LENGTH  SHOULD  BE 
♦'ENTERED  './/) 

C 

168  I STEP= ! 

126  WRITE! t ,261 )  ISTER 

261  FORMAT (/,/,/, IX, ' ENTER  THE  DISTANCE  FRON  THE  SUPPLY  FAN  TO  ' 

♦  ,'THE  ZONE  BRANCH  OUCT (FT '  LENGTH  OF  BRANCH  DUCT (FT) ' ,  / , 

*'  AND  AREA ( SOFT )  FOR  ZONE ' ,  IX ,  1 2 ,  / ,  / ) 

READ!*,*)  L( (STEP ),LZ< ISTER ),AZ( (STEP) 

I F ( ISTER. EQ  1 )  GOTO  HI 
IF(l  ( I  STEP )  LT  L(  ISTER-  ID  THEN 
WRITE!*,  '(/A) ' )  '  DISTANCE  FRON  THE  SUPPLY  FAN  IS  TOO  SHORT  ' 
GOTO  126 
ENDIF 

HI  WRITE!*, '( /A) ')  '  ENTER  THE  SENSIBLE  LOAD!BTU/HR) ' 

Wft I TE < * , * )  'LATENT  L0AD!8TU/HR) , SET  POINT  TENPERATURE(oF) , ' 

IF! ISTSTM.EQ  2)  THEN 

WRITE!*, '(A/)')  '  MINIMUM  AIR  VOLUME  RATE(CFN),  AND  LIGHTING  E 

♦  NERGY (BTU/HR-SQFT )  FOR  ' 

ELSE 

WRITE!*, '  (A  / ) ' )  '  AIR  VOLUNE  RATE (CFM) ,  AND  LIGHTING  ENERGYIBT 
♦U/HR-SQFT)  FOR  ' 

ENDIF 

DO  10  J=l,24 
WRITE!*, 262)  I  STEP ,  J 

262  FORMAT ( /,1X,  ’ ZONE',  I X,  12, 3X, 'HOUR',  IX,  12) 

10  READ!*,*)  QSZ! ISTEP.J) ,QLZ( ISTEP,J),TZ( ISTEP.J) ,CFMZ( ISTtP.J) ,QL 

♦  6Z( I  STEP , J ) 

I STEP= ISTER*  1 

IF! ISYSTN  EQ  3 )  GOTO  169 

125  WRITE!*,'!//!*!)')  '  ARE  THERE  NORE  ZONES  FOR  DATA  INPUTMY/N)  ' 

READ!*, 251)  YN4 

I F ! YN4  HE. 'T'. AND  YN4  NE  'N' )  GOTO  125 
IFITN4  EQ.'Y')  GOTO  126 
C 

169  DO  II  1  =  1,1  STEP- 1 

WR I TE(6 ,  * !  I !  I ) , LZ ! I ! , AZ ( I ) 

00  12  J--1.24 

12  WRITE (6,*)  QSZ(I1J),QLZ(I,J),TZ(I,J),CFHZ(I,J),QL6Z(I,J) 

11  CONTINUE 

1(1  STEP ) =0  0 


l Z 1 1  STEP  > =0 . 0 
AZ ( I  STEP !  =0 . 0 

WRITE! 6,* I  L(ISTEP),IZIISTEP),AZ(ISTEP) 

REWIND  6 
CLOSE (6) 

GOTO  130 

EISEIFIRFIAG  EQ  3)  THEN 

OPENte , F I LE=FZMA«E ,F0RH= 'FORMATTED* ,STATUS='OLD') 

REWIND  i 
CLOSE (6 ) 

SOTO  138 

ELSE  I F( KFL A6  EQ  4)  THEN 

0PEN(6 , F 1 1 E  =  FZNANE, F0RN= 'FORNATTEO' , STATUS: 'OLD') 

REWIND  6 
ASTEP: I 

REA0!6,«)  L!AST£P),LZ!KST£P!,AZ!ASTEP) 

I F ( AZ! ASTEP) . EQ . 0  01  THEN 
REWIND  8 
SOTO  1 34 
END  I F 

DO  !«  1=1,24 

READ'S,*!  QSZ!  ASTEP, Jl.QLZt ASTEP, J!,TZ( ASTEP, J)  , 

tcwiwtp.j)  ,tHG2'.*snp,j> 

A$TEP*ASTEP«! 

GOTO  133 

WR I  T£!I,2B9)  RSTEP-t 

FORMAT CURRENTLY  THERE  IS  DATA  FOR  ',12,'  ZQS'EE  IN 
♦ ,  'THE  DA’A  FILE 
WRITE!!, 270) 

FORMAT  ( / , /,/,U,  'ZONE',  5*,  'BRANCH  DISTANCE  FR0N  SUPPLY  FAN' 

*,/,/) 

DO  17  I  =  1 ,  ASTER- 1 
WRITE!*, 271)  1,1(1) 

FORMAT ( 2 X , 1 2 ,207 , F7 . 2 ) 

CONTINUE 

WR ! TE( !,'(/// A)  ’ )  '  REMEMBER ,  ZONES  MUST  BE  NUN6ERED  BT  ’ 
WRITE!!, '(A/)')  '  INCREASING  DISTANCE  FRO*  THE  SUPPLY  FAN  ' 
IF! (KSTEP- 1 )  EQ  I!  THEN 
0  L  OW=  C  C 

OH  I GH  =  L i "STEP  - 1 ) 

ELSE 

OlOW=L(At  i'EP-2 ) 

OH ! GH  =  L ! KSTEP- 1 ) 

ENDIF 

WRITE!!, 272  )  ASTER- 1 , GLOW, CHIGH 


!' 

i 


| 
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272  FOflKAT ( '  f OP  EXANPtE,  THE  BRANCH  DUCT  FOR  A  NEW  ZONE'  ,13,/, 

♦  IX, 'MOST  BE  BETWEEN', IX, F7. 2.'  FT  AND',F7.2,'  FEET  AWAY',/, 

♦  IX, ' FROM  THE  SUPPLY  FAN  IN  THE  TRUNX  DUCT .',1,1,1 ) 

135  WRITE! > , '  ( 1AU ' )  '  ENTER  THE  NUNBER  OF  THE  NEW  ZONE  — ' 
REACH,*)  N20NE 
I F (NZONE  LTD  GOTO  135 
IFINZONE  ST. ASTER)  NZONE=RSTEP 
WRITE!*, 2  7  3  )  N20NE 

273  FORMAT! ENTER  THE  DISTANCE  TO  THE  BRANCH  FRO*  THE  ' 

♦  , 'SUPPLY  FAN(FT)',/,'  LENGTH  OF  BRANCH  DUCT ( FT )  AND  AREA', 

♦  '(SOFT)  FOR  THE  NEW  ZONE  M3,/) 

READ!*,*)  LNEW, L2NEW, AZNEW 

IF(NZONE.GT.(ASTEP-!).AND. LNEW. GE  L (ASTEP-1 ) )  THEN 
GOTO  142 

ELSEIFINZONE.ST  (KSTEP- 1 >  AND  LNEW  LT  l (KSTEP- 1 ) )  THEN 
WRITE!*, 289!  NZONE , L (KSTEP-1 ) 

289  FORMAT!/,/,'  FOR  THE  NEW  ZONE  TO  BE  NUMBERED  ',12,',',/ 
♦,'  THE  DISTANCE  FROM  THE  SUPPLY  FAN  TO  THE  BRANCH  DUCT',/, 

♦  MUST  BE  AT  LEAST  '  ,F7  2,  IX, 'FEET  ',/) 

GOTO  135 

ELSEIF! (NZONE  Efl  H  AND  (LNEW  ST . L (NZONE )) )  THEN 
LALOW=0 . 0 
LAHI GH=L (NZONE) 

WRITE!*, 276)  NZONE , LALOW, LAH I GH 
GOTO  135 

ELSEIF! NZONE . EQ  I)  THEN 
GOTO  142 

ELSEIF (LNEW  LT  L (NZONE- 1 )  OR. LNEW  GT  L (NZONE ) )  THEN 
WRITE (*,276!  NZONE , L (NZONE- I ), L (NZONE ) 

276  FORMAT!/,/,'  FOR  THE  NEW  ZONE  TO  BE  NUMBERED  ',12,',',/ 
♦,'  THE  DISTANCE  FROM  THE  SUPPLY  FAN  TO  THE  BRANCH  DUCT',/, 

♦  '  MUST  BE  BETWEEN',  IX, F7.  2,  IX,  'AND  \F7  2 ,  IX, 'FEET . ' ) 

GOTO  135 
ENDIF 

142  CONTINUE 
AS:  I 

DO  18  UNZONE, ASTEP 
l(ASTEP*2-AS):L!ASTEP*l-AS) 

LZ(RSTEP*2-ASULZ(*STEPM-XS) 

AZ(ASTEP<2-AS!:AZ(ASTEP*I-AS) 

IFIAS  EQ.  I)  GOTO  18 
DO  19  J=t ,24 

PSZ(RSTEP*2-AS, J):QSZ(RSTEP+ l-RS ,  J  > 
QLZ(ASTEPt2-AS,J):QLZ(ASTEP*l-AS,J) 
TZ(ASTEP*2-AS,J!:TZ(ASTEP*1-AS,J) 

CFMZ( ASTEP+2-XS ,J)=CFMZ<KSTEF+I-AS,J) 

19  Ql6Z(*STEP*2-AS,J):QlGZ(X5TEP«l-AS,v) 

18  AS-.ACtl 
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L (NZONE ):LNEW 
LZ(NZONE)  =  LZNtW 
AZ(NZ0NE)=A7NEW 

IF(  I5YSTMEQ2)  THEN 
WniTE(t,306)  NZOKE 

FORMAT (/ , / , IX, 'ENTER  THE  SENSIBLE  LOAD (BTU/HR II , 

♦  'LATENT  LOADIBTU/HR) , SET  POINT  TEMPERATURE ( oF IX , 

4  'MINIMUM  AIR  VOLUME  RATEICFM!  AND  LIGHTING  ENERST (BTUIHR-SQFT ) ' , 

♦  MX,' FOR  ZONE', IX, 12,/) 

ELSE 

V/Rl TEI  1, 274  )  NZONE 

FORMAT!/,/, IX, 'ENTER  THE  SENSIBLE  LOAD ( BTU/ HR) , ' , / , IX , 
♦'LATENT  LQADIBTU/HR),  SET  POINT  TEMPER ATURE L oF > , ' , /, IX, 

♦  'AIR  VOLUME  RATEICFM)  AND  LIGHTING  ENERGTIBTU/HR-SQFT ) ' ,  / ,  IX, 

♦  'FOP  ZONE', IX, 12,/) 

END  IF 

DO  20  J  =  1 , 2 4 
WRITE(»,275)  J 
FORMAT!/, IX, 'HOUR', IX, 13) 

READ ( * ,  1 )  QSZ (NZONE, J) .QLZ'NZONE , J) ,TZ (NZONE ,J) , CFMZ ( NZONE , J ) 
♦,QLGZ(NZONE,J) 

DO  21  M, ASTER.! 

WR ! TE ( 6 ,  * )  l ( I ) , LZ ! I ) , A’ ( I ) 

IF!!  EQ  XSTEP.D  GOTO  21 
DO  22  J  =  1 ,24 

WR I TE ( 6 , * )  0S2(I,J),QLZ(I,J',TZ(I,J),CFM2!I,J),QLGZ(I,J) 
CONTINUE 
REWIND  6 
CLOSE ( 6 ) 

,  WR  I  TEI  * , '  ( / AM  ' )  '  00  TOU  WANT  TO  ADD  ANOTHER  ZONE’  (Y/NS  ' 
READ'*,' (Al) ' )  TN6 

IF1YM6.NE  'Y'  AND  YN6  NE  'N')  GOTO  136 
IFIYN6  EO  ' T ' )  GOTO  137 
GOTO  130 
ENDIF 

I  WRITE (*.'( /AM ' )  '  OC  TOU  WANT  TO  EDIT  THIS  DATA’  (YIN)  ’ 

READY  A , ZJ 1 !  YN5 

IF'YNT  NE  '*'  AND  YNE  NE  'N'!  GCTC  132 
IFIYNJ  E5.  ' Y ' )  60T0  I2S 
GOTO  138 

)  OPEHU.F I LE=FZNAME , FORM, 'FORMATTED' , STATUS^ ' OLD  ’ ) 

REWIND  6 


JSTEP:  t 

READ ( 6 , t )  L(JSTEP),LZ(JSrCP!,AZ!JST£P) 

IFtAZ(JSTEP) .ED. 0.0)  THEN 
REWIND  6 
SOTO  128 
ENDIE 

DO  13  J  =  1 , 2 4 

RE  AD ( 6 , t )  QSZ!JST£P,J),QIZ(JSTEP,J),TZ(JSTEP,J),CFN7(JSTEP,J),QL 
♦GZIJSTEP.J) 

JSTEP= JSTEP* 1 
SOTO  127 

I  Ft  I SYSTM. EQ .3)  THEN 

WR !TEt* , '  t /  At ) ' ) '  ENTER  *1";  OR  IF  ED  t  TT I  KG  IS  COMPLETE  *59’  ' 
GOTO  170 
ELSE 

VRITEU.'t/A!')'  ENTER  THE  ZONE  FOP  WHICH  DATA  IS  TO  BE  ' 
WRITE!*, '(At)')’  EDITTED  OR  ’99'  IF  EDITTING  IS  COMPLETE.  ' 

END  I F 

READ !  * ,  * )  IZ 

!F( IZ.EQ  99'  GOTO  132 

IFttlZ  IT  1!  OR  (IZ  GT  ( JSTEP-D)  .OR  !  ( I SYSTM.  EQ  3). AND 

♦  <!Z  ST . I ) ) !  THEN 

WR I TE! * , 283  1  IZ 

FORMAT  11,1,1,'  NO  DATA  EX  ’STS  FOR  ZONE',  13/  TRY  ANOTHER' 

♦  ,'  ZONE  ',/,.’) 

GOTO  13! 

ENDIF 

WR ! TE! * , 264)  IZ 

FORMAT!/,/,'  ENTER  THE  HOUR  WHICH  DATA  IS  TO  BE  EDITTED  IN  ' 

♦ , 'ZONE  ',12,'  ') 

WRI TE I  * , '  (A  t ) ' )  '  IF  DATA  IS  NOT  HDURL’  DATAUr  DUCT  LENGTHS  OR 

♦  AREA),  TYPE  '0*. 

READ!*,*)  JZ 

IFtJZ.LT.O.OR.JZ  GT.24)  THEN 
WR I TE ( * , 250) 

GOTO  931 

ELSE  IF ( JZ . EQ .  0 1  THEN 
WRI TE ! *,  268)  IZ, l( I Z ) , LZ ( IZ) , AZ ( I Z) 

FORMAT!/,/,/,'  EXISTING  DATA  FOR  ZONE ',13,/,/. 

♦  3X ,  'DISTANCE  FROM  SuP'UY  FAN  TO  BRANCH  DUCT  (FT ) ' ,  tOX ,  F8 . 2 ,  / , 

+  3X , 'LENGTH  OF  BRANCH  DUCT (FT ) ' , 28X ,F6  2 , / , 

+  3 X , ' AREA(SQFT) ' , 4 3 X , F 8  2 ) 

WR I TE! * , 266  )  IZ 

FORMAT!/,  / ,  / ,  IX ,  'ENTER  NEW  DATA  FOR  ZONE ',  1 3 \ ) 

READ!*,*)  LEDIT,LZEDIT,AZECIT 

I  Ft  LED  I T  IT  0  0  OR . LZEDl T . LT  0  0  OR . AZEDIT . LT . 0  0)  THEN 
WRITE!*,*)  '  NEGATIVE  LENGTHS/AREAS  NOT  ALLOWED  ' 


GOTO  196 
END  i  F 

IF< (JSTEP.EQ  2)  OB . ( ISTSTN.EQ  3). OR. ((17  .EQ.  ( JSTEPM ) ) 

♦AND  <LEDIT6EL(JSTEP-2))).OR. ({ IZ.EQ. 1)  AND.tLEDIT  LE. 

♦t(2))>)  THE N 

L( 1 2 )  =  l ED  I T 
LZdZHlZEDIT 
AZT  IZ)  =  *ZEDi T 
GOTO  128 

EISEIFKIZ  EQ.  (JSTEP-D)  AND  UEDIT.IT  LUZ-I)))  THEN 
LLOW=L{ IZ-t ) 

WRITE{*,  375)  I Z , L LOW 
SOTO  131 

EISEIFKIZ  EQ.1)  AND  UEOlT.GT.KIZM)>)  THEN 
L  L0W=0  0 
LHIGHM!  IZM) 

WR I TE( t ,  374  )  IZ,L10W,IH|6H 
GOTO  131 

ELSEIF1 (LEDIT  GT  L ( I ZM )  >  OR.  (LEO! T  LT.l(IZM)))  THEN 
UOWUdZM) 

IH IGH=l ( IZ«  1 ) 

WRITE! t,  374  )  IZ,UOW,lHlGH 
GOTO  131 
ELSE 

lUUtltDi: 

IZIIZJ.IZESIT 

aziizkazeoit 

GOTO  128 
ENDIF 

FORMAT!.' MX, 'THE  TRUNK.  DUCT  LENGTH  FOR  ZDNE',1X,I2, 

MX, 'MUST  BE  BETWEEN',/, IX, F6  1 .  IX, '  AND' ,  IX.F6  I ,  IX,  'FEET. ' ,  /  / 1 
FORNAT ( / / , IX , 'THE  TRUNK  DUCT  LENGTH  FOR  ZONE', IX, 12, 

MX, 'MUST  BE  GREATER',/, IX, 'THAN', IX, F6  1, IX, 'FEET  ',//! 

ENOIF 

WR ITEM,  267)  I Z ,  JZ,QSZ ( I Z ,  J2) , QLZ  ( I Z ,  JZ ) , TZ(  I Z ,  JZ)  ,CFNZ ( I Z ,  JZ) , Q 

♦  LGZdZ.JZ) 

FORMAT!/,/,/,'  EXISTING  DATA  FOR  ZONE', 13,'  HOUR ',13,/,/, 

♦  3X,  'SENSIBLE  LOAOfBTU /HR ) ' ,7X ,F  1 2  4 ,  f , 

+  3X , 'LATENT  L 0 A 0 ( 8 T U / HR ) ' ,9X,F12  4,/, 

MX, 'SETPOINT  TEMPERATURE  I  oF)',<X,F  12. 4,/, 

+  3 K ,  'AIR  VOLUME  RATE (CFM! '  ,8X ,F 12 . 4 ,  / , 

♦3X, 'LIGHTING  ENERGY (BTU/ HR-SQFT) ' ,F  12  4,/) 

WRITE!!, 268)  IZ.JZ 

FORMAT!/,/,  IX,  'ENTER  NEW  DATA  FOR  ZONE', 13,'  HOUR ' ,  1 3, ' , 

M) 


READ!! , t)QSZ! IZ, JZ) ,QLZ!IZ, JZ) ,TZ( !Z, JZ) ,CFMZ! IZ, JZ) ,QIGZ!IZ, JZ) 
GOTO  128 


v.*< 


DO  M  1  =  1 ,  JSTEP 
WR  i T E ( 6 ,  * )  L(  I ) , IZ(  I )  ,A2( I ) 

IFI1. ED. JSTEP)  GOTO  14 
DO  IS  J=  1 ,24 

WRITE(6,t)  QSZ! I , J) ,QLZ(I , J! ,TZ(I , J) ,CFNZ( I , J) ,QLGZ  d , J) 
CONTINUE 
REWIND  6 
CLOSE ( f ) 

CONTINUE 

OPEN ( 7, F I LE=FNAM£ , FORM: 'FORMATTED ' , STATUS: 'OLD' ) 

DO  23  J  =  1 ,24 

RE AD ( 7 , t )  TOA( J) , TWB I J ! , QPLWI J) ,RH! J) 

REWIND  7 
CLO S£<7) 

0PEN(6,FILE=FZNAME,F0RN= 'FORMATTED ’, STATUS: 'OLD') 

MSTEP=  I 

READ  1 6 , 1)  LIMST£P!,LZ(MSTEP),AZ(MSTEP) 

IFttAZtMSTEPl.EQ  0 . 0)  .OR . ( f IST5TM.EQ .3) . AND  (MSTEP  EQ. 2) ) )  THEN 
REWIND  6 
CLOSE(6l 
GOTO  140 
END  IF 

DO  24  J= 1 , 24 

READ ( 6 , t )  QSZIMSTEP , J! , 01 Z INSTEP , J ), TZ INSTEP , J ) ,CFMZ INSTEP ,  J) , 
+QLGZ ( MSTEP , J ) 

IFdSTSTM  EQ  2)  CFMZMN ( MSTEP, J )  =  CFMZ( MSTEP , J ) 

CONTINUE 
MSTEP  =MSTEP  + 1 
SOTO  139 
CONTINUE 


=  SET S  THE  NUMBER  OF  ZONES  IN  SIMULATION: 


N=MSTEP- 


=  =  INPUT  OF  MAXIMUM  ZONE  PRIMARY  AND  INDUCED  CFM'S= 
== ( USED  FOR  VAV  STSTEM  ONLY>====================== 


IFdSTSTM  EQ. 2)  THEN 
WRITE!!,  307  ) 

FORMAT!/, 1,1,1, 1,1, IX, 'THE  NEXT  INPUTS  WILL  BE  FOR  MAXIMUM' 

♦  '  ALLOWABLE',/, IX, 'ZONE  AND  ZONE  INDUCTOR  AIR  VOLUME  RATES', 

4 '  (CFM! .',/,/ ,5X, 'NOTE :  IF  THE  MAXIMUM  INDUCTOR  CFM  IS  NOT  ', 

♦  'KNOWN, \/,5X, 'ENTER  A  VALUE  EQUAL  TO  75»  OF  THE  MAXIMUM  ', 
♦'ZONE  CFM  ',/,/> 


w»7 


.-.v. f. 
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WRIT£(*,377)  M 

FORMAT ( / / ,  1 X , ' I F  TOO  CHOOSE  THE  EDIT  OR  USE  OPTION  BELOW, ' 

♦  ,  IX, 'THE',/, IX, 'PROGRAM  Will  EXPECT  TO  READ  DATA  FOR  ',12, 

♦IX, 'ZONES  FROM',/, IX, 'THE  EXISTING  FILE. ', I , IX, 'IF  TOU'.IX, 
♦'CHOOSE  THE  CREATE  OPTION  BELOW,  THE' ,/, IX, 'PROGRAM  Will  ', 

♦  'ONLY  READ  INPUT  FOR  ' ,  12,  IX, 'ZONES. ' , //) 

WR ITE  ( * , 288 ) 

WR I TE ( 8 , 376  > 

FORMAT!/, IX, 'ADD  ADDITIONAL  ZONES  TO  AN  EXISTING  ', 

♦  'FIlE’Um  A)  ',U 

READ!* ,251 1  FCHUZM 
I F (FCHUZM. EO . ' E ' )  GOTO  172 
IFIFCHUZM.EO  'C' )  60T0  173 
IFIFCHUZM.EO.  'U'l  60T0  174 
I F(FCHU2M . EQ . ' A ' )  GOTO  159 
WRITE!t,250) 

GOTO  171 

OF  L  A6=  1 
WRITEfl,252> 

READ! *  ,253  1  MAXCFM 
GOTO  175 

OF  L  A6= 2 
WRITE!*, 254) 

READ!* ,253)  MAXCFM 
GOTO  175 

OFL  A6=3 
WRITE!*, 255! 

READ!*, 253)  MAXCFM 
GOTO  175 

OF  L  A6= 4 
WRITE!*, 250) 

READ!*, 253)  MAXCFM 

1FIOFIAG -EQ.2)  THEN 

OPEN 1 8,  FI  IE rMAXCFM, FORM: 'FORMATTED', STATUS; 'NEW') 

WRITE!*, 308) 

FORMAT!/,/,/, IX, 'ENTER  THE  MAXIMUM  ZONE  AIR  VOLUME  RATE', 

♦ ' (CFM) ' , / , IX , 'AND  THE  MAXIMUM  ZONE  INDUCTOR  AIR  VOLUME  ' , / , IX, 
♦'RATE(CFM)  FOR. ') 

DO  28  l;1, N 
WRITE!*, 309)  I 


a 


FORMAT ( /  ,4X , 'ZONE' ,  IK,  12 ,  / ) 

REAO(t,t)  CFMZMX ( ! ) .CFMZIN!  I ) 

VRITE(M)  CFMZMX! I ), CFMZIN!  I ) 

REWIND  t 
CLOSE  <8) 

GOTO  176 

EtSEIF(OFUG.EQ.4l  THEN 
WRIT£(A,382)  NAXCFN.N 

FORMAT (IX, 'ENTER  THE  NUMBER  OF  ZONES  OF  DATA  ALREADY', 

♦  IX, 'CONTAINED  WITHIN  FI  IE'  ,3X,AU,  / ,  IX,  'MOTE :  THE  PROGRAM 
♦'WILL  EXPECT  A  TOTAL  OF  ',12,'  ZONES ' , / , IX , 'OF  DATA  WHEN  ' 

♦  'APPENDING  IS  COMPLETED.  ',W 

HEAD (* , * )  RAPP 

OPEN ( 8, F I LE=NAXCFN, FORM: 'FORMATTED' , STATUS: 'OLD' ) 

DO  39  1=1, RAPP 

READ(8,i)  CFMZMX ( I ) , CFMZ I M '  I ) 

REWIND  8 

WR ITEU,  378)  N 

FORMAT!//, IX, 'ENTER  THE  NUMBER  OF  THE  NEW  ZONE.',/, 

♦  IX, 'IT  MUST  BE  NUM8ERED  BETWEEN  I  AND  ',12, IX,'.  ',W 

READ ( • , A )  INWZNE 

I F ( ( INWZNE  IT  1  T  OR  ( INWZNE.GT .Nil  GOTO  201 
IS=! 

DO  40  UINWZNE.RAPP 
CFMZMX (RAPP  +  2- 1 S) =CFMZMXtRAPP^ I  -  IS) 
CFMZIM(RAPP+2-IS)=CFMZlM(RAPP+l-IS) 
f  S  =  I S  ♦  1 

WR  I TE ( A ,  379)  INWZNE 

FORMAT ( / / ,  IX, 'ENTER  THE  MAXIMUM  ZONE  AIR  VOLUME  RATE’, 
♦ '  !CFM)  ‘ ,  / ,  IX , 'AND  THE  MAXIMUM  ZONE  INDUCTOR  AIR  VOLUME  ', 

♦  / ,  IX,  'RATE(CFM)  FOR  ZONE  ',12,'.  ',U 

REAOC A , A )  CFMZMX (INWZNE), CFMZIMI INWZNE! 

DO  41  1=1, N 

WRITE(8,A)  CFMZMX! I ) .CFMZIMI I ) 

REWIND  8 
HAPP=RAPP+ I 

IFIRAPP.LT. N!  SOTO  202 
CLOSEI8) 

GOTO  176 


E  LSE I F ( OF  LAG  EQ  3)  THEN 

OPEN58  ,F  I  LE=MAXCFM,FORM= 'FORMATTED ' ,  STATUS: 'OLD' 
REWIND  8 
CLOSE  4  8 ) 

GOTO  178 


\ 

i 


ELSE  I F 1 0FLA6 . EQ . t )  THEN 
60T0  177 
tNDIF 

WRITE!*,  '(/All ' )  '  DO  TOO  WANT  TO  EDIT  THIS  DATAC r/M)  *  ' 
READ ( * 1 25 1 )  TNI 

IFtTNt.NE.'T'  AND.rHI.NE.'N')  6QT0  176 
IFIVN1.EQ. 'T'l  GOTO  177 
GOTO  178 

OPE«(8.FI LE=MAXCFM, FORK='FORMATTED' . STATUS^ ' OLD ' ) 

REWIND  8 
WR ITEt A ,310)  N 

FORMAT!/,/./, IX, 'ENTER  THE  ZONE  FOR  WHICH  DATA  IS  TO  BE  ', 

♦  'EDI  TTED ' ,  /,  IX, ' ( i . e.  ZONES  1  THROUGH',  IX, 12, '),  OP  ’O'  IF  ', 
♦'EDITTINS' , / , IX, ' IS  COMPLETE.  \W 
READ!*, I!  IZN 
IF! IZN.EQ. 0)  THEN 
CL0SEI8) 

GOTO  178 

ElSEIFlIZN.LT. 1. OR  IZN  GT.N!  THEN 
WRI TE(t, 250) 

GOTO  170 
ENOiF 

00  29  1  =  1  , N 

REACTS, * )  CFMZNX! I ) .CFMZIM! 1 5 
REV  INC  8 

WRITE (I, 311)  IZN, CFMZNX! IZN), CFMZIM! IZN) 

FORMAT!/, /,/,/, IX, 'EXISTING  DATA  FOR  ZONE ' ,  IX ,  1 2 ,  / ,  / , 

♦5X, 'MAXIMUM  ZONE  AIR  VOLUME  RATE(CFM) ' , 1 IX, F8  2,  / , 

♦5X, 'MAXIMUM  ZONE  INDUCTOR  AIR  VOLUME  RATEICFM) ' , 2X, F8 . 2 , / , / ) 
WRI  TEH,  312)  IZN 

FORMAT!/, IX , 'ENTER  THE  NEW  DATA  FOR  ZONE' ,  IX,  12 ,2X , U 
REACH, t)  CFMZNX !  I ZN)  .CFMZIM! I ZN) 

DO  30  1  =  1, N 

WRHEI8H)  CFMZNX ( I ) , CFMZIM! I ) 

CLOSE ! 8 ) 

GOTO  177 
ENOIF 

CONTINUE 

IF! ISTS7M  ED  2)  THEN 

OPEN! 8, F I L£=MAXCFN, FORN= 'FORMATTED' , STATUS: 'OLD' ) 

DO  31  1  =  1, N 

READ ( 8 , * )  CFMZNX! 1 1 ,CFMZ IMI I ) 

REWIND  8 


CLOSE ( 8 ) 

END1F 

C 

C========== INPUT  OF  FAN  DATA=========================-=========r=== 

C~-rr.-  ====HLLOWS  FOR  FAN  NOTOSS  TO  BE  IN  OS  OUT  OF  A I RST  RE  AN  )  =  ====  = 

C 

WRITE!*, '(///*)')  '  ' 

101  WRITE!*, ' ( IAD ' ) '  IS  THE  SUPPLY  FAN  NOTOS  IN  THE  AIRSTREAN’IY/N)  ' 
READ! * , ' (A  1 1 ' I  TNI 

I F( YNI  NE  ' Y '  AND  YN1  NE.'N'l  SOTO  101 
IFtYNI.EQ  ' Y ' I  THEN 

WRITE!*,*)  'ENTER  THE  DESIGN  EFFICIENCY  OF  THE  MOTOR . ' 

WRITE! ' (A\) ' )  '  (0.0-1 .0)  ' 

READ!*,*)  SNOTn 
ELSE 

SNOTmI.O 

ENDIF 

WRITE!*,*)  'ENTER  THE  0ESISN  EFFICIENCY  OF  THE  FAN.' 
WRITE(t,'(Al)')  '  (0.0-1 .0)  ' 

READ!*,*)  SFANr, 

WRITE!* i A)  'ENTER  THE  DESIGN  TOTAL  PRESSURE  DROP  IN' 

WRITE!*, '(AVI')  '  THE  SUPPLY  DUCT. (INCHES  OF  WATER)  ' 
fiEA0(*,*l  TPS 
C 

C*.-  =  =  r=.-»*AUOWS  FOB  AN  OPJIOH  OH  THE  USE  OF  A  BETURN  FAN**»r«:»,. 

C 

102  WRITE!!, '(//.'  A  \ )' )  '  IS  A  RETURN  FAN  TO  BE  USED?  ( Y/N)  ' 

READ!*, '  (All '  I  YN2 

IFIYN2  NE.'Y'.AND  YN2.NE  'N'l  SOTO  102 
IFIYN2.EQ. 'N' )  THEN 
RNOTns I . 0 
RFANn=  I  0 
TPR  =  0 . 0 
ELSE 

166  WRITE!*, '(/A!)')  '  IS  THE  RETURN  FAN  ROTOR  IN  THE  A IRSTREAN? ( Y.’ N 
*)  ' 

REACH, MAI)')  YNO 

IFIYK3. NE.'Y'.AND  YN3.NE. ' N ' 5  GOTO  166 
IFIYN3.EQ  ' T ' )  THEN 

WRITE!!,!)  'ENTER  THE  DESIGN  EFFICIENCY  OF  THE  MOTOR  ' 

WRITE!!, '(A!)')  '  !0. 0-1.0)  ' 

READ!!,!)  SNOTn 
ELSE 

RMOTa-1  0 
ENDIF 

WRITE!!,!)  'ENTER  THE  DESIGN  EFFICIENCY  OF  THE  FAN.' 

WRITE!*, '(Alt')  '  (0. 0-1.0)  ' 

READ!!,!)  RFANn 


WRITEd ,  *)  'ENTER  THE  DESIGN  TOTAL  PRESSURE  DROP  IK' 
WRITE!*. '(RUM  '  RETURN  !  INCHES  OF  WATER)  ' 
READd.l)  TPP 
END  IF 


======FAN  CONTROL  NETHOD  CHOICE: . . 

======(NOT  FOR  USE  WITH  THE  TERNINAL  REHEAT  STSTEN) ========== 


I  Ft  I STSTN  NE  D  THEN 
I F ( I STSTM . EQ .3)  THEN 
ISFAN=4 
GOTO  194 
END  IF 

WR I T£(l, 335) 

FORMAT ( / , 1, 1,1,1.'  ENTER  THE  NETHOD  TO  8E  USED  FOR  SUPPLY ' , 
♦IX, 'VOLUME' . / . IT, 'CONTROL  BT  SELECTING  THE  NUNBER  TO  THE  LEFT' 
+  ,  IX,  'OF' , / , IX, 'THE  NETHOD  DESIRED  ',1,1, 

♦5X,'(t>  VARIABLE  SPEED  NOTOR ' . / . 

♦5X,'(2)  INLET  DANPERE',/, 

♦  5  X ,  ’  (3)  DISCHARGE  DAN5ERS',/, 

♦  5X. '  (4)  CTCLINS  FAN',/,/) 

WRITE!*,  '(AU'l  '  TOUR  CHOICE? ! I/2/3/4)  ’ 

READ!*,*)  I  SPAN 


===CURVE  FIT  DATA  COEFFICIENTS  FOR  SUPPLY  FAN  CONTROL* 
=  =  =  (OBTA INED  FRON  DOE  MB  ENGINEERS  NANUAl )  =  =  =  =  =  =  =  =  =  = 


IFlISFAN.LT  1 .OR  ISFAN.GT.4)  THEN 
WRITE!*, 250! 

WR I TEt  t , 335  ) 

GOTO  185 

ELSE  IF ( I SFAN . EQ . 1 )  THEN 
SFPLDt 1 )=D. 00153028 
SFPLDC2) =0  00520808 
SFPLD(3)=1. 1085242 
SFPLD(4)  =  -0. 1  1635563 
ELSE  I F ( I SFAN  EQ  2 )  THEN 
SFPLDt 1 ! =0  35071223 
SFPLDt  2) =0 . 3C80335 
SFPL0 (31 =-0 . 54 13738 
SFPLD ( 4) =0  87198823 
ELSEIFtlSFAN  EQ. 3)  THEN 
SFPLDt 1 )=C. 37073423 
SFPLD(2)=0. 97250253 
SFPLD(3)=-0  3424078 
SFPLDt 4 ! =0  0 
ELSEIFtlSFAN  EQ  4)  THEN 


■rw'% 
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i IX, 'VOLUME', /, IX, ' CONTROL  IT  SELECTING  THE  NUMBER  TO  THE  LEFT’ 
♦, IX, 'OF',/, IX, 'THE  METHOD  DESIRED  ',/,/, 

+5X , ' 1 1 )  VARIABLE  SPEED  MOTOR ' ,  / , 

♦5X, '  (2)  INLET  DAMPERS ' , / , 

♦  5  X , '  (3)  DISCHARGE  DAMPERS',/, 

♦  5X, '  (4)  CTCLING  FAN',/,/) 

WRITE!*, ' t AT) ' )  '  TOUR  CHOICE*!  I/2/3/4)  ' 

READ!*,*)  IRFAN 


===CURVE  FIT  DATA  COEFFICIENTS  FOR  RETURN  FAN  CONTROL: 
—  (OBTAINED  FROM  DOE  2  IB  ENGINEERS  MANUAL )::  =  ===:=:: 


IF!  IRFAN.LT . 1 .OR. IRFAN.GT .4)  THEN 
WRITE!*, 250) 

WRITE!*, 340 
GOTO  UO 

ELSE  IF! IRFAN  EOT)  THEN 
RFPLD ! 1 ) =0 . 00 153028 
RFPLD ( 2 ) =0 . 00520806 
RFPLD(3):|. 1086242 
RFPLD(A) :-C . 1 ! 0355B3 
ELSEIF I  IRFAN  EO  2 >  THEN 
RFPLD! 1 ) =0. 35071223 
RFPLDI2 ) :0 . 30J0535 
RFPLD(3):-0  5413736 
RFPLD(O:0  I7IJ8I23 
ELSEIF! IRFAN  EQ . 3 )  THEN 
RFPlDdlrO  37073425 
RFPLD! 2) =0 . 97250253 
RFPLD! 3) :-C . 3424076 
RFPLO! 4  )  =  0 . 0 
ELSE  I Ff IRFAN  . EQ  4)  THEN 
RFPLD!  0:0.0 
RFP L 0 ( 2 )  =  f  0 
RFPLD! 3 )  =0 . 0 
R  FP  L  0  <  4 1:0.0 


:=:==OPTIQN  TO  CHANGE  RETURN  FAN  DEFAULT  COEFF  1C  I ENTS  =  =  =  =  : 


WRITE (*,  345  !  RFPLD! !) ,RFPLD(2) ,RFPLD(3)  ,RFPLD(4) 
FORMAT!,',/,/,/,/,'  THE  TEMPERATURE  RISE  IN  THE  RETURN  DUCT' 

♦  IX,  'DUE  TO  THE',/, IX, 'FAN/FAN  I  MOTOR  WILL  BE  CALCULATED  AS', 

♦  IX, 'FOLLOWS  ',/,/, 5X,  'DELTA  TEMP: (DELTA  TEMP  DESIGN) * (POLT )/ ' 
♦'PLD',/,/,10X, 'WHERE  PlD=ACTUAl  CFN/DEsiGN  CFM',/,17X, 
♦'P0Lr=A*8*Pt0+C*!PLD**2)+0*(PLD*t3)',/,/,22X,'A:',F!0.8,/, 

♦  22X, '8=',F!0  8,/,22X,'C=',F10  8,/,22X.'D=',F10  8,/,/, IX, 


♦  'COEFFICIENT  SOURCE:  00E  2.18  ENGINEERS  NANUAL-NAT  1HI ',//) 

WRITEU.346) 

FORMAT  < IX, ' IF  ANT  OF  THE  CONSTANTS  (i  (.  A,B,C,0I  NEED  TO', 

♦  / , IX, 'BE  CHANGED,  TTPE  THE  LETTER  OF  THE  CONSTANT;  IF  THEY ' ,  / , 
♦IX, 'ARE  ALL  OXAT,  TYRE  ■£*') 

WRITE!*, ' (Al )' )  '  TOUR  CHOICEMA/B/C/D/E)  ' 

READ!*, 'LAD')  ICT 
IFIICT.EQ  'EM  THEN 
GOTO  192 

ELSE  IF! ICT . EQ. 'A' )  THEN 
WRITE!*, ' !Al) ' )  '  ENTER  THE  NEW  CONSTANT.  A=' 

READ!*,*)  SFPLDI I ) 

ELSE  I F ( ICT. EQ . 'B'l  THEN 
WRITE!*, ' (A\ )' )  '  ENTER  THE  NEW  CONSTANT  B=' 

READ!*,*)  SFPL0I2) 

ELSE  I F( ICT . EQ. 'C' )  THEN 
WRITE!*,'!*!)')  '  ENTER  THE  NEW  CONSTANT  C=' 

READ  I  * ,  * )  SFPLD(3) 

ELSElFdCT  EQ  'D')  THEN 
WRITE!*, '(AU’)  '  ENTER  THE  NEW  CONSTANT  D  =  ' 

READ!*,*)  SFPID(A) 

ELSE 

WR ! *£(*,  250) 

END  IF 
GOTO  191 
!  CONTINUE 

)  CONTINUE 


IFLAG4=0 


:s::s:CALCULATES  DUCT  ARE  A*** ARE A= A I R  F L OW / V E LOC I T Y ***  =  =  =  = 


DO  38  I = I , N 
IF!  ISYSTN.EQ.2)  THEN 
ACFNZ(ll=CFNZNXd) 
ELSE 

ACFNZ! I )=CFNZ(  1,12) 
ENOIF 

ADZ  ( I ) = ACFAIZ !  I !  /VD 

DO  36  I  =  1 , N 
IR:Nil-l 
ACF  MM =0.0 
00  37  1=1,1 
JR  =  Nd-X 

ACFMM= ACFMM+ACFMZ ( JR) 
ACFN(IR)=ACFMN 
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C 

C  =  =  = 

c 


c 

c== 

c 


AD ( I R ) = ACFK ( IP) /¥ 

=====TWENTT-FOUR  HOUR  S I  MU  L  AT ) OK  L00P===== 
00  25  J=  t . 24 

::::: 1 N ! T 1 A L I ZES  HOURLY  SIMULA! I0HS=  =  ===  =  = 


26 


00  26  1=1, H 
I  FLAGS ( I )=0 
QRKZ 1 1 , J ) =0  0 
CFMZI ( I , J)=0. 0 
IF! IFIA64.EQ. 1 )  GOTO  25 
I F  LAG  1  =  0 
IFLaG2=0 
IFLAG3=0 
IFLAG7=0 
1 F  L AG9  =  0 
I WCHT  =  0 

IF!.'  ED  I)  TPL  =  T"LA 
JX--J 


I  F<  ( I STSTM  EQ  3 ) .  AND  ! ICNTF.L  NE.2ii  THEN 
FRHRA=C  8 
ELSE 

FRHRA=I  0 
ENOIF 


C 

C  =  =  = 

c 


=  =  =  =  =  SETS  VAV  ZONE  AIR  FLOWS  TO  MAX  I  MUMS  FOR  INITIAL  ITERATION! 


CFMX  =  0 
DO  5  1  =  1,  N 

IF! I SYSTM  EQ  2  ANC  QSZ !  1 ,  JX )  NE  0  0!  CFMZ ( I , JX )  =  CFMZMX ( I ) 
CFNl=CFNX«CFMZt  I , J) 

CFM! I , J  3  =  CFMX 


100 


CALL  HUM! 0 
CALL  TDUCT 
CALL  QQUCTT 
CALL  TPLENL'N 
CALL  TSZREQC 


IF! 1 STSTM  EQ  2 )  CALL  CFMPEQD 
I F ( ( I STSTM  EQ  2)  AND  ( IFLAS5  EQ.01I  SOTO  IOC 


IF!!  IFLAG2  .EQ.  1 ! .  AND  ( IFLAG9  ECO)!  60T0  106 
CALL  SETTLCC 
IFtlFLAG9.EQ.il  SOTO  100 


IH  IFLAG4.EQ  1)  GOTO  25 

60TO  ICO 

CONTINUE 


=  HERAT  I  ON  ON  PLENUM  TEMPERATURE  (TO  WITHIN  0.  IK  <0.  loF)  )  = 


D=ABS( (TPl-TPl 1 ) /TPl) 

IF  (0  .GT.  0.001)  THEN 
If (CFN( 1 , J ) . EQ . 0  0 )  THEN 
TP  L  =  T  P 1 1 
ELSE 

TPL={TPL+TPL1)/20 
I F  L  AG2  =  0 
GOTO  100 
ENDIF 
ELSE 
T  P  L  =  TP  L 1 
END  t  F 

=  rIs:  =  s:C*LLS  FOS  CALCULATION  OF  COIL  LQADS  =  =  =  --  =  =  --s  =  =  r  =  =  =  =  5  =  :t  =  = 

CALL  QRHEAT 
CALL  QCCOIL 
5  CONTINUE 

IF(IFLAG4  EQ.  1)  GOTO  144 


sF I LE  STORAGE  0-'  INP'JT/OUTPUT  ANC  PRINTING  OPTIONS: 


WR  t  TE ( * ,  3 1 9 ) 

FORNAT!/, /,/,/, /,/,/,/,/,  IX,  'ENTER  "DRI VE .  F I LENAME .  EX'  "IN' 
*'  WHICH  THE  INPUT/*,/, IX, 'OUTPUT  OATA  IS  TO  BE  STOREC  ' ,1 ! 
REAO'4,253)  OUTFILE 

WR  I T E ( A , '  ( / A '  DO  YOU  WAIT  A  HARD  COPY  OF  THE  OUTPUT!  Y/N'  ’ 
READ! *, '(ATT')  YN ! 

IFIYN1.NE  'Y'.ANC  YN1  NE.'NM  GOTO  105 

WRITE!*,  M/ADM'  DO  TOU  WANT  A  HARD  COPY  OF  THE  INPUT(Y/N)> 
READ!*, MAI)’)  YN6 

IFETN6  NE  'YMAN0.TN5.NE  'N'l  SOTO  113 
IFfYNI.EQ.'Y'  OR  YN5  EQ  ’YM  OPEN ( 1 0 , F I L E * ' l P T 1 ' ) 

OPEN! 9 , F I LE=OUTF I LE , FORN= 'FORNATTED’ .STATUS* ' NEW' ) 

WRITE!*, 359  ) 

WR  I T  E  ( 9 , 3  5  9  ) 

IFIYN6  EO  'YM  WRITE!  tC,278) 

FORMAT(29X, ' INPUT  DATA' ,  1 , 28X ,  12!  '*'),/ ) 

FORNAT 292 INPUT  DATA ' , I ,2>X, 12!  '*'),/ ) 

WRITE!*, 305  ) 

WR  f  TE (9 , 305  ) 

IFIYN6  EQ  'YM  WR  I  TE  (  10 , 305) 


it 


305  F ORMAT ( IX, ' ( 1 !  SYSTEM  USES 27 1 X , \ ) 

IF!  1 SYSTM. EO  I!  THEN 
WRITE! t, 342  ! 

WRITE!}, 342) 

I  Ft YN6 . EQ  ' Y ' )  WR I TE (  10, 342  ) 

342  FORNAT ( 'TERMINAL  REHEAT') 

ElSEIFt tSYSTM.EQ  2)  THEN 
WR I TE!  1, 348  ) 

WRITE!}, 348) 

I F( YN6  EQ  ' Y ' )  WR I TE!  10,348  ) 

348  FORNAT ( ' WAR  I  ABIE  AIR  VOLUME  Wl TH' , 1 , 44X , 1  INDUCT  ION  ', 

♦  'REHEATERS' ) 

ELSE 

WRITE!!, 34  9  ) 

WR I TE!  9 , 349  ) 

I F! TN{ . £9  'T')  WRITE!  10,349) 

349  FORNAT ('CYCLING  SYSTEM' > 

END :  F 

IFdCNTRl.EQ  t)  THEN 
WR I TE! I , 350)  TLCCF 
WR  I  TE!  9 , 350)  UCCF 
I F( YN6  EQ  ' Y' )  WRITE! 10,350!  TICCF 

350  FORNAT  ( IX, '  (2 )  CONTROL  NETKOD  l/SEO' ,  19! ' . '  I ,  IX, 'FIRED  SET  ', 

♦  'POINT!', F4  1,'oF)') 

E1SE IF ! ICNTR1 . EO  2)  THEN 

WR I TE 1 1 , 35 1 ) 

WRITE!},  35U 

IFITN6  EQ.'T'!  WRITE!  10,351) 

351  FORMAT !  IX, ' (22  CONTROL  NETHOD  USED ',  19 IX .'  ZONE  CONTROLLED 

♦  ) 

ELSE 

WRITEII.352)  SCHDLE 
WR I TE!  9 , 352  !  SCHDLE 
I F ( YN{  EQ  'T')  WRITE! 10,352!  SCHDLE 

352  FORNAT!  IX,  '  (2)  CONTROL  NE'HOC  USED' , 19! ’ . ' ) , IX, 'OUTSIDE  AIR' 

♦  , 'CONTROLLED  ',/,  5X ,'!  2i !  Schedule  file  mss 1 , 15 ('.'),  IX ,  AI4 ) 

ENDIF 

IF ( INOA  EQ  I)  THEN 
WRITE!!, 353) 

WR I TE! 9 , 353! 

I F ( YN6  EQ  ' Y ' )  WR I TE!  10 , 353  ! 

353  FORMAT! I X , ' ( 3 )  ECONOMIZER  NETHOD', 21!'  'i, IX, 'NONE  USED') 

ELSE  I F ( ! MO A  EQ  2)  THEN 

WR I TE!  1 , 354  ) 

WR 1 T  E  <  9 , 3  5  4  ) 

IF( YN6  EQ  'T')  WR I TE!  10, 354  ) 

354  FORNAT! IX, ' (3)  ECONDN ’ZER  NETHOD' , 2  !! '  '), IX, 'OUTSIDE  AIR  ', 
♦'CONTROLLED') 


138 


ELSE 

WR I TE! * , 355) 

WR I TE(  9,355  ) 

IFITN6  EQ  T)  WRITE!  10,355) 

355  FORMAT ( It , ' ( 3)  ECONOMIZER  METHOD' , 21 ('.'), IX, 'ENTHALPT 
♦'CONTROLLED') 

END  IF 

PCTOAM=PTOA«t 100 . 

WR I TE  1 1 , 356  )  PCTOAM 
WRITEI9.356)  PCTOAM 
IF(TNt.EQ.'T')  VR ) TE!  IS,  35  0  PCTOAM 

356  FORMAT (5X ,'( 3j )  Milieus  percentage ',15! ' . ' ) ,F5 . I , 'I', /, IDX, 

♦  'of  outside  li r  at  I  eyed' ) 

WRITE (1 , 357)  FNAME , FZNAME 
WR  I  TE (9 , 357)  FNAME, FZNAME 
IF(TNJ.EQ.'T')  WRITE! 10,357)  FNAME, FZNAME 

357  FORMAT t  IX, ' (9)  WEATHER  DATA  FILENAME' ,  17! ' . ' ) ,  1X.A14 ,/ , 

♦  IX, '  (5)  ZONE  UNIQUE  DATA  FI LENAME ' ,  13! ' . '  > ,  IX, AU) 

IF! ISTSTMEQ  2)  THEN 

WR  I  TE! A ,  358  )  MAXCFN 
WR I TE!  9 , 358  !  MAXCFM 
I  Ft YN6  EQ . 'T ' )  WRITE! 10,336)  MAXCFM 

358  FORMAT  ( 5X , '  (5a)  Manaus  zone  priaary  a  i  r ' ,  9! ' . ' ) ,  IX, AM ,  / , 
♦lOX.'voluae  rate  t  aaiiaua  induction',/, 

♦  /OX, 'air  yo/uae  rate  data  liltaiat') 

END  I F 

PSFANns 1 00 . *SFANn 
PRFANrz 100 . tRFANa 
PRKOTrs 100  tRMOTn 
PSMOTm  100  *SMOT n 
WR  I  TE ( t ,  360  !  TPS, PSFANn 
WR I TE (  9 , 360  )  TPS, PSFANn 
IF(TN6.EQ  'T'l  WR ! TE! 10 , 360)  TPS, PSFANn 
360  FORMAT! IX , ' (6 !  SUPPLT  FAN  DATA' , / ,5X , ' (6a)  Design  total 

♦  'pressure  dr  op' ,7! ' . ' ) ,F8 . 2 , ' ! inches  of  water )',/ ,5X ,' (6b! ' , 

♦  '  Fan  design  efficiency', 12!'  ').F5. 1.'%') 

IFISMOTn.NE  1.0)  THEN 

WRITE!*, 361)  PSMOTn 
WR  I  TE! 9, 36 1 )  PSMOTn 
I F (TN6  EQ  'T ' )  WR I TE ( 10 , 36 ! )  PSMOTn 
36!  FORMAT ( 5X , ' (6c)  Motor  design  e t f ,  e iency ' ,  10! '  ' ) ,F5  I, 'I') 
ELSE 

WRITE!*, 362) 

WR I TE (  9 , 36 2  ) 

IFITN6.EQ  ' T ' )  WR I TE! 1 0 , 362  ) 

362  FORMAT i 5X , ' (6c)  Fan  aotor  not  in  airstrean  ') 

ENDIF 

IFMISFAN.EQ  t)  OR  (IRFAN  EQ  D)  F  AN  T  T  P  = '  V  A  R I A  B  L  E  SPEED  MOTOR' 


I 

I 


♦ 

I 

L 


IFUISFAN  EQ  2) .  OR.  ( I RFAN .  E0 . 2 ) )  FAHTYP= '  INLET  DAMPERS 

1F< (1SFANEQ3) .OR. (tRFAN.EQ  3))  FANTYP=*01 SCHARGE  DAMPERS  ' 

IF t f I SFAN  EQ  4)  OR. ( IRFAN  EQ  4))  FAMT YP= 'CYCLING  FAN 
I F ( I SYSTM. EQ .2)  THEN 
WRITE!  *,  363)  FANTTP 
WR I TE ( 9 , 3€3 )  FANTTP 
IFtYMS .EQ. ' Y ' )  WRITE! 10,313)  FANTTP 

FORMAT ( 5X , ' (fid)  Fai  air  iduwe  control  ae t hod ' , 4 1 X , A 2 0 ) 
ENDIF 

IF (TN2.EQ. 'N' )  THEN 
WR I TE ( * ,  364 ) 

WRITE!!, 3(4) 

IF (TNI  EC  ' Y' )  WRITE! 10,364) 

FORMAT  ( IX , '  (7)  RETURN  FAN  DATA'  ,23! ' .  ’ ) , '  RETURN  FAN-NOT  USED') 
ELSE 

WRITE!*, 365)  TPR,PRFANn 
WRITE!!, 365)  TPR.PRFANn 
IF(YN6  EQ  'T')  WR I TE ( 10 , 365!  TPR.PRFANn 
FORMAT ( IT, '  (7)  PE’UPN  FAN  DATA’ , 1 ,5X, ' (7j!  Design  total 
♦  'pressure  dr  op ' , 7!  ’ . ' ) , F6  2 , ' < i n  che  s  ot  water ) ' , / ,51, '(7k) ' , 

*'  Fan  design  efficiency',  12 ('.'), F5  I, 'I') 

IF'RMOTn  NE  10)  THEN 
WR I TE(A, 366!  RRMOTn 
WRITE!!, 366)  PRMOTn 
IFITN6  EQ  ' Y ' )  WRITE!  10, 366)  PRMCTn 

FORMAT < S X , '(7c)  Motor  design  efficiency' , 10! ' . ' ) ,F5. 1, 'I' ) 

E1SE 

WRITE!*, 367) 

WRITE!!, 367) 

I F ( TN6  EQ  T )  WRITE!  10, 367) 

FORMA T ( 5 X ,  ' (7c)  Fan  note.'  not  in  airslreas.') 

ENDIF 

IF! ISTSTM.EQ.2)  THEN 
WRITE!!, 368)  FANTTP 
WR!TE(!,368)  FANTTP 
IF(TN6  EQ  ' T ' )  WR I TE !  10 , 368 !  FANTTP 

FORMAT ( 5 X ,  ' ( 7 d )  Fan  air  refuse  control  we t hod ' , 4! ' . ' ) , IX, AID) 
ENDIF 
ENDIF 

WRITE!!, 36!)  KCHNSE 
WRITE!!, 36!)  KCHNEE 
IF1TN6  EQ  'T'>  WRITE! 10,369)  RCHN5E 

FORMAT! IX, ' (8)  NUMBER  OF  CHAN5ES  'OP  VALUES  OF  THE ' , 3! '  '), 

♦12, f,5X, 'DEFAULT  CONSTANTS') 

WRITE!!, 321) 

WR  I  TE  (9 , 321 ) 

IF ( TN I  EQ  'T'  AND  TN6  EQ  'T')  WR I TE! I D, 32 ! ) 

I F ( TN 1  EQ  ' T '  AND  TN6.EQ.'N’)  WR I TE (  1  0 , 320  ) 


1 


ij 

HI 

.Hi 

Hi 

'll 

H] 

HI 


320  FORMAT  ( '  1 ' ,  29X ,  'SYSTEM  DATA ',/,  29X ,  13  !'='),//,  !0X ,'  TEMPERATURE' 

♦  4X,  'HUMI D I TT ' ,  AX,  'COOL  IMG', 18X , ' PERCENT ' , / , 1CX , ' IEAVI KG',  8X, 

♦  'RATIO'  ,  7X, 'COI l ',8X, 'PREHEATER' .IX, 'OUTSIDE' ,/, I0X , 'COOL IN6' , 

♦  8X,  'LEAVING'  ,5)1,' LOAD ' , 8X, 'LOAD' ,9X , ' AIR  USED' ,  / , 2* ,  'HOUR ' ,  A* 

♦ , 'COI L(oF) ' ,7X, 'CCOI L ' ,7X, ' (BTU/HR) ' ,4X, ' (BTU/HR) ' ,5X, 

+  '  (1/ >00) ' ,  / , 2X.  4 ( '  = ' ) .  4X ,  !!('=')  ,21  AX, 8 1  '  =  ')>,  4X,  9 1  '  = ' ) ,  AX, 

♦8 ('='),/ ) 

321  FORMAT ( / / / ,29X , 'SYSTEM  DATA' ,/, 28X ,  13( 1 ,11, 10X , 'TEMPERATURE' 

♦  AX,  'HUMIDITY' , AX,  'COOL INS' , I8X , 'PERCENT' , f , I0X, 'LEAVING'  ,8X , 

♦  'RATIO' ,7X, 'COIl' ,8X, 'PREHEATER' ,AX, 'OUTSIDE',/,  10X, 'COOLING' , 
♦8X, HEAVING' ,5X, 'LOAD', 8X, 'LOAD' ,»X, 'AIR  USED' , /,2X, 'KOUR' , AX 

♦  , 'COI l(eF )' ,7X, 'CCOI L ' ,7X, ' (BTU/HR) ' ,4X, ' (BTU/HR) ', 5X , 

♦  '(4/l00)’,/,2X,4('*'),4X,1l('  =  '),2(4X,8!'s')),4X,9r  =  '),4X, 

+  8 ('  =  '),/ ) 

DO  9  Js  1  > 2 A 

IF(CFM(I,J)  EC  0.0)  THEN 
WR I TE (9, 3 13 )  J 
WRITE!*,  313)  J 

IFtYNI  .EQ  'T'l  VRITE(10,313>  J 
ELSE 

WRITE  1  9, 295  )  J ,  TICCA  J)  ,VLCC(  J) ,  OCCl  ( J ) ,  QPH 1  J) ,  PTDAt  J ) 

WRITE (*,295)  J,TLCC(J),WLCC(J),QCCl(J),QPH(J),PTOA!J) 

IFITN1  EQ  'T')  WRITE!  10,295)  J , TICCI J) ,WLCC( J ) ,QCCl ( J ! , 

♦QPH ( J ! ,PT0A ( J ) 

END  IF 

295  FORMAT (3X, I2,8X,F5.I,7X,F?.5,2(5X,F8.1),5X,F52> 

313  FORMAT { 3 X ,  12, 1 7 X , 'tilt  PRIMARY  SYSTEM  OFF  ****') 

9  CONTINUE 

DO  32  1=1, N, 3 
I  ZN1=  I 
! ZN2  =  I  ♦  1 
IZN3  =  1  +  2 
C 

IF(I.EQ.I)  THEN 
WR I TE ! 9, 3AC ) 

WR  I  TE( * , 3A0 ) 

IFfyNt.EO  '7')  WR I TE( 10, 3A 1 ) 

ENDIF 

3AC  FORMAT!/////, 3AX, 'ZONE  DATA ' ,/ ,33X,  1 1  !'  =  '),// ) 

3A1  FORMAT!'!', 3AX, 'ZONE  DATA' ,/ ,3AX, 1 1 ('  =  '),// 1 
C 

IF(IZNt.ST.N)  GOTO  181 
I F  ( I ZN2 .  GT  N )  GOTO  182 
IFF I7N3  GT  N)  GOTO  183 
C 

I8A  WR I TE ! 9 , 323)  IZN1 , IZN2 , IZN3 
WR I TE ( * , 323 )  I ZN1 , I ZN2 , I ZN? 

I F ' !TN1  EQ  ' Y ' ) . AND  (I  EQ  !))  THEN 


141 


WRITE!  10,323)  IZNt , I ZN2.  IZN3 
ELSE  I F (TNI . EQ. *  Y' I  THEN 
WRITE!  10,330  IZN1 ,  IZN2, IZN3 
END  I F 

323  F0RNAT(4X,3(8X, 'ZONE'.IX,  I2.8X) , / ,5X,3( 1X,22(  '  =  ' ) ) ) 

336  FORMAT !'t',4X,3(8X, 'ZONE' , IX, I2<8X)./,SX<3(IXI22('3'))) 
WRITE!), 324) 

WRITEU.  324) 

IFIJN1.EQ.  ' Y* )  WRITE!  10,320 

324  F0RMAT15X,  3!  IX, 'PRIMARY',  IX, 'INDCTN'.IX, 'REHEAT  MX)) 

WRITE ( 9, 325) 

WRITE!*, 325) 

IFtYNI.EQ.'Y'I  WRITE! 10,325) 

325  FORMAT!  IX, 'HOUR',  3!  3X,'CFM',4X,'CFM',3X,'BTU/HRMX >,/,/> 

00  33  J:  1 ,24 

WRITE (9, 326)  J, CfKZ! I ZNI , J) ,CFNZ 1 1 IZNI , Ji ,QRHZ< I ZN1 , J) , 
♦CFNZ(IZN2,J),CFNZI(IZN2,J),QRHZ(IZN2,J),CFNZ(IZN3,J),CFNZ! 

* !  I ZN3 ,  J ) , QRHZ!  I ZN3 , J) 

WRI  T£(  t,  326  )  J,  CFMZ!  IZNI,  J),  CFNZK  IZNI,  J),QRHZ<  IZNI,  J), 
♦CFMZ! IZN2, J) ,CFNZ I ( I ZN2, J) ,QRHZ( ! ZN2, J) ,CFNZ ! IZN3 , J) ,CFNZ I 
♦  !IZN3,J),QRHZ(IZN3,  J) 

IF(YNI.EQ.'Y')  THEN 

WRITE!  10,326  )  J ,  CFNZ! I ZNI , J ) , CFMZ! ( IZNI , J) ,SRKZ ( IZN ! ,  J I , 
♦CFNZ(IZN2,J),CFMZI(IZN2,J),QRHZ( I ZN2 , J) , CFMZ : I ZN3 , J! ,CFMZ I 
*(IZN3,J),QRHZ(IZN3,J) 

ENCIF 

326  FORMAT (2X , 1 2,  IX, 3!  IX , F7  1 ,  IX.F6 . 1 ,  !X,F7. 1! ) 

33  CONTINUE 

30TC  16 I 

183  WRITE!), 327)  IZN!,IZK2 

WRITE!*, 327)  IZN!,IZN2 
IFliTNI.EQ  ,y ' ) .  AN"  '!  EQ  1!)  THEN 
WRITE! 10,327)  IZN1,:ZN2 
ELSE IFtYN!  EQ  ' Y ' )  THEN 
WR I TE ( 1C , 337)  IZN1.IZN2 
ENCIF 

327  FORNAT(4X,2(8X, 'ZONE', IX, 12, 8X) , / ,5X,2 ( 1X,22( '*')!) 

337  FORMAT! '1',4X,2(8X, 'ZONE', IX, 12,8X1, / ,5X, 2! 1X.22! '='))) 

WR I TE!  9 , 328  ) 

WRITE!*, 328) 

IHYN1  EQ  ' Y' )  WR I TE!  I C ,  328  ) 

328  F0RNATT5X,  2!  IX,  'PR  INARY  '.IX,  'INDCTN'.IX,  'REHEAT  MX!) 

WR I TE ! 9, 329) 

WRITE!*, 329) 

IFtYN!. EQ. 'Y')  WRITE!  10,329 1 

329  FORMAT  ( IX,  'HOUR ',  2<3X,  'CFK',  AX,  'CFN' ,3X, '8TU/HR  MX  )./,)> 

DO  27  J= ! , 24 


Cljllj 


t 

I 

n 


WR I  T£(9 , 330)  J ,CFMZ( IZN1 ,J) .CFHZI ( IZN!  ,J1  ,QRH2(  IZNf ,  J) , 
♦CFMZt IZN2, J) .CFMZI ( IIK2,J),QRHZ(1ZK2,J) 

WRITE! 1,330)  J.CFMZ! IZN! , J) , CFHZ I t IZNI , J) ,QRHZ( IZNI , J) , 
tCFNZ!  IZN2,  J)  ,CFMZ I  ( IZN2 , J ) , QRHZ  ( I ZN2 ,  J ) 

IF(THI.Eg.'T')  THEN 

WRITE!  10,330)  J.CFMZ! IZH1 , J) , CFMZI <  IZNI  ,J) , QRHZ! IZNI ,  J) 
+CFMZ!  IZM2 ,  J)  ,CFMZ  I  ( I ZN2 ,  J ) , QRHZ ( I ZM2 ,  J ) 

END  IF 

FORMAT ( 2X , 12, 1X,2!1X,F7. 1, 1X,F6. 1, 1X,F7. 1)) 

CONTINUE 
60T0  III 

WRITE(9. 33 1 )  IZNI 
WRI TE! 4, 33 1 )  IZNI 
IF! (TNI  EQ . 't ' )  AND  (I  EQ  ID  THEN 
WRITE!  10,331)  IZNI 
ELSEIFITN1 .EQ. 'T')  THEN 
WRITE! 10,338)  IZNI 
ENOIF 

FORMAT!  I2X,  'ZONE MX,  12,/, IX, 22 ('  =  *>) 

FORMAT! ' I ',12*, 'ZONE' , IX, 12,/, 62,22!  '  =  ')> 

WR I TE( 9 ,332) 

WR I TE( A, 332) 

IF(TN1  EQ  ' Y ' )  WRITE!  10,332  ) 

FORMAT  162,  'PIUMAST ',  IX, 'INDCTN', IX, 'REHEAT') 

WR I TE ( 9 , 333 ) 

WR!T£(I,333) 

IF(TNI.EQ.'T')  WRITE! 10,333) 

FORMAT! IX, 'HOUR' ,3X, 'CFM' ,4X, 'CFM',3X,  'BTU/HR ',/,/) 

DO  35  J--1.24 

WRITE! 9, 339!  J.CFMZ! I ZNl , J) , CFMZI ( IZNI , J) ,QRHZ! IZN! . J) 

WR I TE ( • , 334 )  J.CFMZ! IZNI, J), CFMZI! IZNI, Jl.QRHZ! IZNI, J) 
IFfTNI.EQ  ' T ' )  THEN 

WRITE!  10,334  )  J ,CFMZ( IZN! , J ! , CFMZ I ! I ZNl , J ) , QRHZ ( I ZN ! , J I 
ENOIF 

FORMAT ( 2  X , l2,2X,F7.1,tX,FSI,lX,F7l) 

CONTINUE 

CONTINUE 

CONTINUE 

=  =  =  ==SHOWS  RUNNING  TIME  PER  HOUR  FOR  CTCIING  STSTEM  — --  =  =  =  =  =  =  : 

IF! ISYSTM  EQ  3)  THEN 
WR I TE! t , 37 1) 

WR I TE! 9 , 37 1 ) 

I F ( TN 1  EQ  ' T ' )  WR I TE ( 10 , 37! ) 


WVi 
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5N0FL0ATCALLS 
i STORAGE : 2 
C 

SUBROUT  1  ME  (OHIO 

C 

IMPLICIT  REAL  (A-H.L.P-Z) 

0 1  MENS ! ON  HFGZI 50 ) ,PVS(24) ,WLCCN!24 ) 

COMMON/AAAAA/CFN(50, 24 ) , CFMZ(50, 24 ) ,N, JX , INOA , ICNTRL , ISYSTN, 
♦MIN.MN , AD( 50 ) , ADZ ( 50 1 , ACFMI50 ) , ACFM2I50) ,  FRHR124) , F R H R A 
CDMN0N/BBBBB/DTD(50) , DTDT ( 50) , DTDZ ( 50 ) , V, VD, l (50) , LZI50) , TP( , 

+  T  0 ( 5  0 ) ,TOO,UO 

COMMON  /  DDDDD I  CPMtt  I X ,  CPMLCC.CPMR ,  CPA  ,CPV,CPl ,  HGLCC ,  HLCC.HOA,  HBA 
COMMON/FFFFF  (SPVA  ( 50) ,  UCZ ,  AZ  (50  ,QLGZ(50,24),TZ(50,24),T0A(24! 
♦,TN8(24) ,FRQL6T,TPL I ,  TPLA,FL(IXW,QPLV(SO)  .AMXECON 
COMMON . 'G6GG6I Q5Z ( 50, 24 ) ,QLZ( 50,24 ) ,TSUPRZ ISO) ,DTRH( 50  ,QRHZ(  50,24  ! 
COMMON /HHHHH/RH (24 ) , PTOA!24> ,TNI X,$PVZ(50) ,VOAS,VOA,WLCC(24) , 
♦VZI50)  ,VR,VNIX,  IFLAG1  ,UCC(24!  ,TR(24 1 ,  IVCHK, SPVSC ,PTOAN, HG, 

♦TLCCF, IFLAS2, IFLAG3, IFLAG4.ST0A! 150) ,STLCC( 150) ,TLCCA(24) 

COMMON M II ll/SFHP,fiFHP,TPS,TPR, SF AN n , B F ANn , SMOT b . RMOTn . DTSF , 
♦DTRF,SFPL0(4),RFPL0(4) , AMXTLCC 
COMMON/ J JJJJ/QCCt  (24)  ,QPH(24! , FROL 
C 

C::==::=::SET  INITIAL  RETURN  ANO  LEAVING  COIL  TEMPERATURES:::::::::: 

C 

IF(  (JX.EQ.  I)  AND.  ( IFIAG1  .EO.  O)  TR!JX):TPl 
IF( (JX.GT.  1 )  AND  ( t F LAS  1 .ED  O!)  TR ! JX) :TR ( JX-1 ) 

I F ( ICNTRL. EQ  I)  TLCC(  JXHTLCCF 

I F ( ( J X  E Q  1!  .AND  ( IFIAG3 .EQ.O) . AND. ( ICNTRL . ME .  I) )  TLCC!l):TOO 
IF(  (JX.GT.  I )  AND .  ( I FLAG3  EQ  0)  AND  ( ICNTRL.  NE.U)  TLCC(JX): 
♦TLCC(JX-t) 

C 

C:::  =  ::::  =  COMPUTE  THE  OUTSIDE  HUMID  I TT  RATIO:::::::::::::::::::::::: 

r* 

U 

WOAS=(8.616456E-4)+(7.2  T4287E-5) *  TWE ( JX ) - (  9 . 044  HlE-7)t  (TWBt  JX 
♦  )**2  )  +  (5.952B77E-8)«(TWB! JX)t*3)-(4  841947E- 0 ) t ( TWB ( JX ) **4 ) ♦  < 

+3  305658E- 12 )*CTVB( JX)«t5) 

HC: 1041  365t  4338772*T0A(JX) 

NGR:  100 1 . 36S* .  4338772STR4JX) 

HGLCC= 106 1  365+  4338772*TLCC( JX) 

NGSAT:1D01.305». 4338772*TWB( JX) 

HFSATs-32 . 34752+ ! .01694fitTWB ( JX)- (2  1 1 T 9 1 7E- 4 ) • ( TWB ( J X ) **2 ) ♦ ( 7 . 
+802479E-7)*( TWB ( JX) «*3 ! 

WOA= ( CPA* ( TWB (JX)-TOA(JX) )+WCAS*(HGSAT-HFSAT ) ) / (HG-HFSAT) 

C 

C=::::  =  =  =  =  THE  CONDITION  LEAVING  THE  COILS  IS  BASED  ON  A  VARIABLE-.::: 

C  =  ::::::::RELATIVE  HUM  I D I T T-COMPUTE  THE  COIL  LEAVING  HUMIDITY  RATIO: 

C 

WICCS:  ( 8  6  164«6E-4M7.2142B?E-5)tTLCC(JX)-(«  044  1 6  1 E  -  7 )  *  ( T  L  C  C 
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♦(JX)tl2)+(5.952877E-8)*<TLCC(JX)l*3)-(4.8419«7E-10)f(TLCC(JX) 

+**4>+(3305658E-t2)*(TLCC(JK)**5) 

TICCA( JX  1=TICC( JX>  +  459. 67 

C8=- 10440. 4 

C9s-1  1 . 2946669 

CI0  =  -0  02700133 

C 1  1  -  0 . 1 269706  0E-4 

C  t2  =  -0 . 2478068E-8 

Cl  3=6  5459673 

PWS ( JX) =EXP(C8/TICCA( JX)+C9*Ct0*TLCC4( JX )*C1 t*( TLCCAI JX)**2)+ 
+  C 12* ( TLCCAf JX)**3)tCI3*AlOG(TLCCA( JX) > ) 

PSTD= 14 . 696 
C14=PWS(JX)/PSTD 

WLCCH(JX)=WLCCS*RH( JX )*( 1 . 0-C14) / ( 1 . 0-RH(JX)*C  14 ) 
VLCCUX)sVlCCM(JX) 


==COt4PUTE  THE  ZONE  HUMIDITY  RATIO  AND  SPECIFIC  VOLUME=  =  =  =  = 


1  DC  2  1  =  1, N 
SP  V  0  =  1 3.33 

HFG24 l)=109327-.5654665*TZ(I.JX) 

D  IFUCFRZd.JX)  EQ  0 . 0> .  OR  (FRHRA  EQ  0 . 0) )  THEN 
WZ( I )=WLCC( JX ) 

ELSE 

WZd  UillCCl  JXWQIZd  ,  JX ) tSPVOI  (CFNZ  d  ,  JXUHFGZd  JI60 
♦  IFRHRA ) 

END  IF 

SPVZ( I )  =  0  0 2 5 2  1  1 2 * ( TZ < I , JX ) ♦ 4 5 9  7)*(l  0*1  (07I<WZ( I ) ) 
DIFSPV=ABSdSPVZd)-SPVO)/SPVO) 

IFIDIFSPV  ST  0  001!  THEN 
SPVC=SPVZ ( I ) 

GOTO  1C 
END  1 F 
CONTINUE 

========CONPUTE  THE  RETURN  HUMIDITY  RAT  1 0=  ===  ====  =  =  =  =  =  =  =  =  =  --  =  = 


ANVR--0  D 

DO  3  1=1, N 

ANWR=AMVR*  (CFNZ ( I ,  JX  XVZI 1 1 ISPVZI I ) ) 

I F( CFM( 1 , JX 1  EQ  0  0!  THEN 
VR=WLCC . JX ) 

ELSE 

C0NST  =  (TMJX)*4597)P(  ( AMVR1  ( 1 . 0-FRDIHO  0252  1  12  /  (CFMI I ,  JX )  I 
♦  )*  IFRCUWICC I  JX)  I  ( ( 1  0*  I  607S*VLCC(  JX)  )*(TLCC(  JX)«4S9  Till) 
Wt=CON$T/: 1-1  60701C0NST) 

END  I F 


i 


s 


C=  =  =  =  ===  =  =  COMPUTE  THE  OUTS  I DE  AIR,  RETURN  AIR  AND  IEAVING=========== 

C=====:===COIl  AIR  ENTH A L P I E5  ============= =  =  = =  = =  = = =  = = = = =  : = == = ===== = 

c 

HOA=CPAtTOA(JXWHGt¥OA 
HRA:CPA1TR(  JXWHGRAVR 
HlCCiCPA»TlCC(JX)*H6lCC»WlCC(JX) 

C 

C=========CO«PUTE  THE  LEAVING  COIL  ANO  RETURN  AIR  SPECIFIC  KEATS. === 

C 

CPMLCC=(CPA*CPVt¥LCC(JX))/(t. +NLCC ( JX ) ) 

CPNR:  (CPA-tCPVIVR)  /  ( 1  4  WR ) 

C 

C:====:=:=CALL  SUBROUTINES  TO  DETERMINE  AIR  TEMPERATURE  RISE  Dl)E  =  =  :: 
C---  =  -"  =  sTO  FANS  AND  THE  PERCENTAGE  OF  DITSICE  AIR  TO  BE  USED .  ===  =  = 
C 

CALL  OTFAN 
CALL  PCTOAIR 
C 

Cs  =  ss  =  :r  ==CONPUTE  THE  C0CLIN6  COIL  ENTERING  HUM  1 D I TY  RATIO  l  TENP.=: 
C 

WM I X  A = P  T  0  A ( JXIAWOA* ( I . O-PTOAL  JX!  )1WR 
C 

20  C«=( ( I . -PTOAt JX) )*<  1 . . 6078*WMI XA) tTR<  JX) )  /  ( ( 1  ♦  1  6078*WR)» 

*(TR(JX)*4!9.7!MPT0A(JX>iT0AUX))t(1.*l  $078«m!XA!J((TOA(JX) 
♦♦459.7)t!1  ♦I.6078AWOA)! 

TNI X:459 . 74C4/L  I-C4  I 


C5  =  (TMI X  +  45  9  7  ) * P T 0 A ( J X ) *WC A / < (TOA'JX) *459.7  )11  1. 0+  1  6078*WOA) ) 
WM i X  =  ( ( 1  O-PTOAI JX! ItWR+CS) / ( 1  0-C5« 1  6C78 ) 

C6=abs(iwnix-wnixa:/wn:xa! 

C7=abs((wiccux)-wnix)/wn:x: 

IFLC4.GT. 0.001)  THEN 
WM I X  A = WM  f  X 
GOTO  20 
END  t  F 

CPMNI X= (CPA*CPVtWN ! X) / ( I . +WNIX! 


C  =  =  rr  ===  =  =  CETERNINE  IF  THE  MAXI  MUM  HUNIDITT  RATIO  LEAVING: 
C:  =  :  =  =  =  =  -.=THE  COILS  HAS  BEEN  REACHES',  i  t  VET  CDIL)  =  =  =  :  =  =  = 
C 

IFIVNIX  GE . VLCCKI JX) !  THEN 
I  VCHX:2 
RETURN 

ELSE  I F( (WMI X . IT  WLCCMC  JX) )  AND  (C7  GT  0  COT))  THEN 


VLCC(  JXUWNIX 
IVCHIU1 
60T0  25 

ELS£IF(!VN!X. LT.WLCCNI JX)) .AND. (C7. IE .0.00!))  THEN 
VLCCI JX):VNIX 
INCUR: I 
RETURN 
END  IF 


SNCFLOATCALLS 
SSTOflAGE  2 
C 

SUBROUTINE  DTFAN 

C 

IMPLICIT  REAL  <A-H,L,P-25 

COMMON /AAAAA.'CFM!50,24) , CFMZ150, 24) ,N, JX, INGA, ICNTRL , ISTSTN, 
♦MIN,MN,AD(50!,AD2(50),ACFM(50: .ACFM2I50) ,FRHR(24>  ,FRHRA 
COMMON/BBBBB/OTDf 50? ,DT0T(50> . 0T02 ( 50 > , V, VO , l E 50 ) , LZ I 5C ) . TPL 

♦  TO  1 50 ) ,  TOO ,  IID 

COMMON  'D0000 / CPMM IX,CPMLCC,CPMR,CPA, CPV.CPL,HGLCC,HLCC,HOA.H 
COMMON /FFFFF /SPVAI20)  ,UC2 ,A2 ISO)  .QLGK50 ,24)  ,TZ(5C  ,24 )  ,TQA',2 
+ .  TWB C2B1 (FSQLGT ,TPL! ,TPLA, F  LVXV , QPLV2SC) ,  ANXECON 
COMMON,’ HHHHK: RHC 24!, PTOAC 24 ), TNI X, SPV2 (50? . WORE, WOA.WLCC  124! 
♦VZ!50) ,VR,WMI X , IFLAGI  ,TLCC(24)  ,TR(24 ! ,  I WCHK ,  SPVSC  , PTCAN.  HO , 

♦  TICCF.IFIAB2. IF1AG3, ! FLAG# , STOAT  J 50 ' , STL CC ( 1 50 ? , TICCA (24 ) 
COMMON  / 1 1 1 1 1  /  SFHP,  RFHP,  TPS,  TPR,  SF  ANn,  RFANr. ,  SNOT  d.RKOTu.DTSF, 

♦DTRF,SFPIC(4),  RFPLOM) ,  ANXTLCC 
COMMON/ JJJJJ/QCCL (24!, QPHI24), FROL 


C=  =  =  =  =  s:z  =  NQTE  0 1  STANCE  FROM  CCIL  TO  SUPPLT  FAN  IE  ASSUMED;:; 
C:-.  =  ::  =  =  =  r  TO  BE  NEGLIGIBLE::: 

C 

IFCCFMCT . JX)  EQ.O  0)  THEN 
DTSFzO.O 
OTRF  =  C  0 

SPVS0=(U:C(JXU459  7)t(l.  +  l.4078»V!CC(JX)U0  0252  1  12 
GOTO  10 
ENOIF 


==COMPUTE  THE  0ESI6N  TEMPERATURE  RISE  ACROSS  SUPPLT  FAN:=== 


OSFHP  =  TPS*ACFM( 1 ) / ( SFANnt6350 .  > 

OSMHPrOSFHP/SMOTfl 

SPVSD  =  (TLCCt JXI  +  459  7)11  1  ♦  1 .  BC78n/LCC(  JX)  )»0 . 0252  !  12 


v.vv.v.vv.v: 


m 


1 48 


ODTSFsDSMHPtSPVSD 42545 . / (ACFNC  t )4CPNlCCiC0. 1 
C 

C::s-=3s=:COMPUTE  THE  DESIGN  TEMPERATURE  PISE  ACROSS  RETURN  FAN===== 

C 

DRFHP=TPR*ACFM<  T  )*(  1 . 0  +  FRDL)  /  <RFANn*6350 . ) 

DRMHP=DRFHP/ RMOT  n 

SPVRD  =  (TR(JX)+459  7T* ( 1 . ♦  1  6078*WR>*0  0252  1  12 
DDTRF=DRMHP>SPVRDt2S4S  / (ACFMT  T )t( 1 . 0  +  FRDL  )*CPNR*60 . ) 

C 

C*:=======CONPUTE  THE  PART  LOAD  RATIOS=*==  =  =  =  =  ===  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  * 

C 

IF ( T ! STSTM. EO  1J.0R. ( C I SYSTM. EC  3) . AND  (ICNTRL.EQ.2)))  THEN 
DTSFsDCTSF 
CTRF;DD’Rf 
ELSE 

»F( fSTSTM  EQ  3)  THEN 
P  LD  =  FRHR A 
ELSE 

PLD=CFM( t , JX) / ACFMl I ) 

END  I F 

IfIPID.EQ.II  0)  THEN 
OTSF=0  0 
DTRF = 0 . 0 
SOTO  10 
END  I F 
C 

CsssssssssCORPL'TE  THE  PAST  LOAD  TEMPERATURE  R1SES==  =  *"S==  =  «»==  =  =  : 
C 

SP0ir=SFPirm»SFPlCmtPlD<SFPLDI3)»tPlD»l2)*SFPLD(4)l 

♦(PLDII3) 

DTSFrDDTSFISPOLT/PlD 

UPOir=RFPlD(1>+RFPlO(2>«PlDtRFPlD(3)l<PlD412>*RFP'D(4)» 

♦IPIDP43’ 

DTRF  =  DDTRF*RPOLT  TPLD 
END  i  F 
C 

C:::::::z:COHPIITE  THE  SUPPLY  AIR  TEMPERATURE  DOWNTSTREAM  0F~  =  =  =  =  =  *  = 
CsssssssssSUPPLY  FAN  .  .  . . .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 

c 

10  TOO  =  TLCC( JX)  +DTSF 
C 

C::  =  ::::::COMP'JTE  THE  RETURN  AIR  TEMPERATURE  DOWNTSTREAM 

C=  =  =  =  =  =  5  =  =  RETURN  FAN  . . . . . . 

C 

TR( JX)=TPL+DTRF 
IFLAGIrl 
C 


RETURN 


SHOFLOATCALLS 
iSTORASE : 2 
C 

SUBROUTINE  PCTOAI R 
C 

IMPLICIT  REAL  (A-H.L.P-Z) 

COMMON /AAAAA/CFMl 50,24) ,CFMZ ISO, 24) ,N, JX, I MOA , I CNTRL , I SVSTM , 

«M IN .MN, AD(SO ) , ADZ ( SO ) , ACFMCSO » , ACFMZ (SO) ,FRHR(24),FRHRA 
COMNON/DODDD/CPNNI X.CPNLCC, CPNR, CPA  ,CPV,CPL ,  HGLCC,HLCC,HOA,HRA 
COMMON /FFFFF/SPVA(50)  , UCZ,AZ!50),OL GZ (50,24), TZ(50,2A),TOA (24) 
♦,TWB(24> .FRQLGT.TPL 1 , TP L A , F L UXW . QP L W< 50 ) .AMXECON 
COMMON/HHHHH/RHC24)  ,PT0A(2«) , TM I X ( SPVZ ( 50 ) ( WOAS . WOA , WL CC ( 2 4 ) , 
♦WZ '50) , WR , WM IX,  IFLAG1 ,  iLCCtZA)  ,TR'. 24) ,  IWCHK,SPVSD,PTOAN,HG, 

+  TLCCF, IFLAG2, (FLAGS. I FLAG4 , STOAf 150) , STtCCt 1 50) , TLCCA  124 1 
C 

C=========CETERM!NE  WHICH  ECONQM! ZER  CHOICE  HAS  SEEM  WADE . ========== 

C 

IF( IKOA . EQ  I)  GOTO  100 
IF( IMCA  EQ  2)  GOTO  101 
I F < IWOA . EC  3)  GOTO  102 
C 

C=========PERCENTAGE  OF  OUTSIDE  AID  FOR  NO  ECONOMIZER  OPTION======== 

C 

100  PTOAI JX)=PTOAN 
RETURN 


C 

C=  =  =  =  ===  =  =  PERCENTAGE  OF  OUTSIDE  AIR  FOR  CRT  BULB  CONTROLLED  OPT  I ON  = 
C=========AMXECON  IS  THE  MAXIMUM  OUTSIDE  AIR  TEMPERATURE  WHICH===== 

C=  ======  =  =IS  ALLOWED  FOR  ECONOMIZER  OPERAT I  ON . =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  = 

C 


101  IF(TOA(JX) .67. AMXECON)  THEN 
PTOAIJXUPTOAN 

E15EIF(((T0A(JX).GE. TRIJX))  AND  (TOA(JX)  LE . TLCCI JX) ) !  OR 
♦  ((TOA(JX).IE.TR(JXD.AND  (TOA(JX).GE  TLCCIJX))))  THEN 
PTOAI JX ! =1  0 

ELSE  I  F( ( (TOA( JX )  GE - TR( JX! !. AND- (TR ( JX )  6E . TLCCI JX) )!  OR 
♦((TOA(JX)  IE  TRIJX!)  AND. (TRIJX) . IE  .TLCCIJX))))  THEN 
P  TO A { JX )  =PTOAM 
ELSE 

PTOAI  JX)  =  (  TRIJX) -TLCCI  JXiHITR I  JX)-TOA(JX)) 

END  I F 

IF (PTOAI JX )  IT.PTOANi  PTOAI JX)  =  PTCAM 
RETURN 
C 

C=  =  =  =  =  =  =  =  =  PERCENTAGE  OF  OUTSIDE  AIR  FOR  ENTHALPY  CONTROLLED  OPT  1 0N  =  = 


===:::===IF  CCIl  IS  OUT  tie  ttfCHKr 1 )  THEN  THE  OUT  B U L B ========== = 

;=======:=CONTROLLED  ECONOMIZE!!  IS  USED  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  =  === 

102  IF!  IWCHK  .NE  .2)  60T0  101 

IF(((HOA  GE. NBA) .  AND  (HOA  lE.HLCO)  OP.  ( (HOA.IE.KRA)  HMD. 

♦  <H0A  GE.HtCO!)  THEN 
PT0A( JX!=1 .0 

ELSE  IF ( ( (HOA  SE . HRA)  AND . <HRA  BE  HLCC  > )  OR  ( (HOA  LE  HRA) .  ANC 
+  ( H R A  IE  HLCC)!)  THEN 
PTOA( JX)=PTOAN 
ELSE 

PTOA(JX)  =  (HLCC-HRA)  /  (HOA-HRA) 

ENDIF 

I F ( P T OA ( J X )  LT.PTOAM)  P T C A ( J * )  =  P T C AN 
RETURN 

END 


5NOFLOATCAUS 
SSTORAGE  2 

SUBROUTINE  TDUCT 

IMPLICIT  BEAL  (A-H,L,P-Z) 

COMMON IAAAAA/CFM! 50, 20 , CFNZ ! 50 , 2M ) ,N, JJ, I NOA , ICN7PL, ISTSTM, 
♦mim,mm,ao;50).aoz(50!,acfm;5c:,acfm:!;c),fbh5:2o  ,frhra 
COMMON  I  BBSS  5  ICC  (50)  .DTDT150)  ,OTDZ(50)  .V.VC,  1(50) ,  LZI50!  ,TPL, 

♦TO ( 50 ) , TOO ,UD 

common/ddddd/cpmm;x,cpmlcc,cpmr,cpa,cpv,cpl,hglcc,hlcc,hoa,hr* 
C0MM0N/EEEEE IP  I ,TSUPZ(50) , I F l AG  9 

COMMON (FFFFF/SPVA  (50),UCZ,AZ(50),QL6Z(50,20,TZ(50,20,TCA(20 
♦ ,  TWB ( 2« ) , FRQLGT , TPL 1 . TPL A ,FLUXW, QPLW' 50) , AMXECON 
C0MM0N/66GGG/CSZ( 50,20 ,QLZ(50,2A),TSUPRZ(50! ,DTPH(50) ,QRHZ(50,2O 
COMMCN/HHHHH;RH(20,PTOA'20,TMIX,SPVZ(50),WOAS,WOA,WLCC(20, 

♦WZ (50 )  ,WR ,WMIX ,  IFLAG1  ,TLCC(2A )  ,TP (24) ,  IWCHK .SPVSO.PTOAM, HG, 

♦  TLCCF, IFLAG2 , IFLAG3, IFLAGA , STOA( 150) , STtCCf 150) ,  TICCA(24) 

COMMON! 1 1 1 1 1 /SFHP  ,RFHP , TPS, TPP, SFANn ,PFANn ,  SNOT » ,RMOT» ,DTSF , 

♦DTRF , SFPLD14) ,RFP10(A ) , AMXTLCC 
C 

I F l AG  9  =  0 
C 

C=  =  =  =  =  =  =  =  =  CONPUTE  THE  AIR  VOLUME  IN  TRUNK  DUCT  SECT  I  ON  =  =  =  =  =  =  =  =  =  =  =  =  = = 

C 

DO  1  1=1, N 
I R =N+ 1  - 1 
CFMTR=0 . 0 
DO  2  (=1,1 


I 


JR=N*  1  - R 

CFMTR=CFMTR*CFNZ( JR, JX) 

CFN(  IR,  JX)=CFNTR 

= == S E T  INITIAL  CONDITIONS  AT  BEGINNING  OF  DUCT  SYSTEM== 


DO  3  Ut.N 
IF  (I  .EQ.  I)  THEN 
CFNI I , JX)=CFN( 1 , J X ) 

LTR  =  0  0 
TOT  R=  T  OC 
DTCTR=fl  0 
ELSE 

cfnii,jx)=cfn(i-:,jx).cfn::;-i,jx! 

LTRsH  I  - 1) 

TCTRsTDt !  -1 ) 

OTDTRiCTDT ( I  - 1  > 


=====COMPUTE  THE  TEMPERATURE  RISE  IN  THE  TRUNK  DUCT  SECTIONS  =  =. 

IF!  (CRMT ! ,  JX)  EC  C  Ol.OR.IFRHRA  EQ  C  0!  OR  .  ( <L< 1 5-LTS)  EQ 
♦0  5))  THEN 

OTO(I)=C.O 

ELSE 

X:P I tAD  '  I  ) 

XX=(FRHRA«CFN!I ,JX!ICPNLCCt30  0  1  (SPVSDt'JCt ( Xtt  5)t!L(ll- 
+  L  T  R  5 ) ) 

DTO? I )=<TPL-TDTPT / (XX+  51 
END  I  F 

TO ( I )=TOTB  +  OTCT  I ) 

OTOT ( I )  =  DTDTR*OTD(  I ) 


--COMPUTE  THE  TEMPERATURE  RISE  IN  THE  BRANCH  DUCT  SECTIONS  = 


I F  ( ( CFMZ  ( I ,  JX I  EQ.O  Ol.OR.IFRHRA  EQ  0  0)  OR.ILZID.EQ  0  0! 

♦  )  THEN 

OTDZI 1 1  =  0  0 
ELSE 

Y  =  P  HAOZ 1 1 ) 

TT:(FRHfiA«CEMZ!l,JX)tCPMLCC*30  OHSPVSOMIDKYtt  5)ILZ(II1) 
DTDZI I )=(TPL-TO( I )) F (YT+ . 5) 

ENDIF 


=  COMPUTE  THE  SUPPLY  AIR  TEMPERATURE  5EING  SUPPL I ED  = 
=TO  EACH  ZONE--BEFORE  ANT  REHEATING  OR  INDUCTION  == 


TSUPZ(I)=T00*DTDT(I1*DT0Z(I) 


t 

I 


V  TO*  V w  u* 


Vk.yv 'T*  «V  »V  *>„  W  W  «  V  _  •  -  mmJ w"-’  *m.:\A7VM\X.  ~LA  ^  "WM  V  JV»T«  ^ 


i' 


I 


15? 


3  CONTINUE 
C 

C=  =  =  =  ===~C0NW£  TNE  RUNNING  TINE  PER  HOUR  FOB  THE  CTCIINS  SYSTEM .  = 
C 

IF( ( ISTSTN.EQ.3) .AND. (TLCCI JX)  NEANXTLCC) )  THEN 
I F( CCFM7 ( 1 , JX) . EO  0.0) . OR. (TSUPZ ( 1 ) . EQ . TZ1 1 , JX)  > >  THEN 
FRHRI JX) =0 . 0 
ELSE 

FRHRI JXUIQSZI 1 ,  JXltSPVZI  I ) )  /  (CFN2(  1 ,  JX)  tCPAKTZ1 1 ,  JX)- 
♦TSUPZ(I))»60.) 

END  IF 

I F  (FRHRA .  EQ .  0 . 0 )  THEN 
OFRHfliO.O 
ELSE 

OFRHRiABSt IFRHRA-FRHRI JX! ) /FRHRA! 

END  I F 

I F ( DFRHR .  GT .  0 . 0 1 )  THEN 
FRHRA=FRHP! JX ) 

I  FLAGS: 1 
END  I F 

ELSEIFtl ISTSTN  EQ . 3 ) . AND . ( TLCCI JX )  EC  ANXTLCC) )  THEN 
I F I CFM2 ( 1 , JX ) . EQ  0  0)  THEN 
FH  HR ( JX) =0 . 0 
ELSE 

FBHR/JXMO 
END  IF 
ENDIF 
C 

RETURN 


SNGFLQATCAILS 
SSTORAGE . 2 
C 

SUBROUTINE  QDUCTT 


IMPLICIT  REAL  (A-H, L , P-Z) 

COMMON/AAAAA  FCFM! 50, 24 ),CFMZ(5C.2N) ,N,JX,IM0A, ICNTRl, ISTSTN, 
♦MIH.MW. A0(50 ) , ADZ<50) , ACFMt 50 3 , ACFMZ ( 50 ) ,FRHR(2*1 ■ FRHRA 
COMMON /BBBBBTQTCI50) ,DTDT (50) .DTDZI50) ,V,VD,L(50) ,LZ(50)  ,TPL . 
♦TO (50 ) , TOO , UO 
COMMON /CCCCC  JQDUCT 
COMMON /EEEEE/PI ,TSUPZ(50),IFLAG9 


C==:::=:==CONPUTE  THE  TOTAL  OUCT  SYSTEM  HEAT  GAIN  FRON  OR  LOSS= 
C======r==TO  THE  PLENUM 

c 


'JA  ‘.  A  *  *  >  ' 


155 


CONNONi DEEEE I P I ,  ISUPZfSOi ,  if  LA59 

COMMON /FFFFF/SPVAC50) ,  UCZ.AZS50) , QL6Z (50,24), TZ(50,24),T0A (24) 

+, TWBI24) ,FRQLGT,TPl I ,TPLA,FLUXW,QPLV(50) , AMXECON 
COMMON /G6G66/Q5Z ( 50 , 24) ,QLZ(50,24) ,TSUPRZ(501 ,DTRH(50) ,QRHI(50,24) 
COMMON /HHHHH/RH( 24)  .PTOAE24)  ,TMIX,SPV2(50)  ,W0AS,W0A,WLCC(24) , 

♦WZ(  50) ,VR ,WMIX,  IFLAG1,TLCC(24),TR(24),  IWCHK ,SPVSD,PTOAM, HG , 

♦TLCCF ,  I FLAS2 ,  I  FLAGS,  IFLAG4,STOA(  ISO), ST LCC ( 150) , TICCA (24) 
COMMON/KFFFIt /CFMZMX  (30) ,  CFM2MN1 50,24 ) ,  CFMZIM(50! ,CFMZ 1  (50,24), 

•f  T  SUPZ I  (50),SPV1  (50) ,  SP  VS  (50) ,  I  FLAGS,  IFLA66, 1  FLAG? ,  I F  LASS  (50) 

C 

C=  =  =  ====  ==COMPUTE  THE  REQUIRED  SUPHT  AIR  TEMP E BAT URE ==  ===  =  =  =  =  =  =  =  =  = = 

C  =  =  =  =  =  =  =  =  =  FOfl  EACH  ZONE  = 

c 

00  I  1*1, B 

IFt(CFMZ(l ,JX!.EQ  0 . 0)  OR .  (QSZ 1 1 . JX) . EC  0.0!  OR 
+ ( FRKRA  EQ.0.0!)  THEN 
TSUPRZ  ( I  )=TSUPZU  ) 

OTRH ( I )=0  0 
RHCHKt 1 ) =500  0 
ELSE 

C  TSUPRZ ( I  )=TZ(  I ,  JXl-QSZ!  I ,  JXUSPVZ!  I )  /  (CFMZ(  I ,  JXHCPAX60  04 

C  *FRHRA ) 

TSUPRZ ( I  )  =  (50 .tFRHRA*CFMZ(!,JX)tCPAITZ(l,JX!-QSZtl,JX'* 

♦  459  710  0252'12t!l.0tl. 60 ? 8 iWLCC < JX ) 1 )/(60.*FRHRA*CPAtCFMZ( I , 

♦jx)+oszn,jx)»o  t2!2ti:m  immccuxu) 

OTRH(!)  =  TSl!PR’(!)-TSUPZ(l) 

RKCHKCIUOTRKCI) 

ENDIF 

C 

C=========0ETERMI NE  THE  CONTROLLING  ZONE  WHEN  THE  ZONE============== 

C==::jsi==CONTROLLEO  METKCC  IS  CHOSEN 
C 

IFil.EO.D  DTM!N  =  5C3 . 0 
I F (RHCHK ( 1 1 . LE . DIM) N)  THEN 
CTM1 N  =  RHCMK  ( I ) 

MIN:  I 
ENDIF 
1  CONTINUE 
C 

RETURN 

ENG 


I 


(NOFLOATCALLS 
4STORAGE ;  2 
C 

SUBROUTINE  CFNREQD 

C 


IMPLICIT  REAL  ( A-H, L , P-Z) 

DIMENSION  CKRCFKL 50 ) ,DCFN(50! 

COMMON/ AAAAAICFM ( 50,24) , CFMZ(50,24) ,N, JX, I  MO A ,  ICNTRL, ISTSTM, 
♦NIN,NN,AD(50),ADZI50),ACFN(50!,ACCNZ(50),FRHR(24),FRNRA 
COMMON/ BBBBB/DTOt 50) , DTOT(SO) .DTDZISO) , V,VD, 1(50) , LZ(50)  ,TPL, 

+  T 0 ( 5 0 )  ,100,110 

COMMON/ ODODD ICPMM I X , CPMICC , CPMP , CPA , CPV , CPI , HELCC ,  HLCC ,  H  0  A ,  H  R  A 
COMMON /EEEEE /P I ,TSUPZ(50) , IFLA69 

COMMON  f  F  FFFF  f  SPVA(  50 )  ,UCZ,AZ(  50) , QLGZI 50,24), TZI50, 24), TOA 124) 
i ,  TWB ( 24 )  ,FfiQLGT,TPL  I ,  TPLA^LUXW.QPLWtSO)  .AMXECON 
CONNQN/GGGG6/QSZ(50,24! ,  QLZ(50,24) ,  TSUPRZt  50 )  ,DTPH!50),CRHZ(50,24) 
COMMON /HHHHH/RH (24 ! ,PT0A(24!,TNIX,SPVZ(5O) ,WOAS,WOA,WLCC(24) , 

+  WZ ( 5  0 ) , WR , WM IX, IFLAG1 ,TLCC(24) ,TR(24! , IWCHK,SPVSD,PTOAM,HG, 

♦  TICCF,  IFLAS2,  IFLAE3,  IFLAG4,ST0A(  150)  ,STLCC(  150)  .TLCCA124) 

COMMON/ 1 1 1  ll/EFHP,RFHP,TPS,TPR,SFANii, RFANn , SMOTb . RMOTn , DT3F , 
♦0TRF,SFPLD(4) ,RFPLD(4),AMXTLCC 

COMMON/ HURRA /CFMZMXI 50) , CFMZMN! 50 , 24 ) ,CFMZ IMI50)  ,CFMZ I (50,24) , 
+TSUPZ I ( 50 ) , SP  V I (50) .SPVSI50) , I  FLAGS, I  FLAGS, IFLA67, 1  FLAGS (50! 

1 FLAG5=0 
IFLAGSsC 


==BENAME  THE  CONTROLLING  ZONE  l  SET  CONTROL  FLAGS= 


I  Ft ( ICNTRL  EC. 2). AND  (IFLAG2 .  £0 . 0 ) )  THEN 
IFUFLAG7  EQ.O)  THEN 
MN=M I N 
I F  L AG7  =  1 
END  I  F 
I  FLAGS: f 
RETURN 
ENCIF 


:::::: IF  THE  ZONE  CONTROLLED  METHOD  IS  CHOSEN,  SET  THE==== 
i==ir:CONTROLL ING  ZONE  AIR  FLOW  TO  ITS  MAXIMUM  AND  COMPUTE 
ss:s::REQU  I  RED  AIR  FLOW  FOR  THE  REMAINING  ZONES  =  =  =  =  =  =  =  =  =  = 


I F ( ICNTRL . EQ . 2)  THEN 
DO  4  1=1, N 
CHRCFMI I )  =  CFMZ( I ,  JX! 

IF(  1 1  EO  MN) .  AND  (QSZU.JX)  ME  0  0 !  AND .  (TLCC( JX!  NE . 

♦  AMXTlCO)  THEN 

CFMZI I , JX )  =  CFMZMX ( I ! 

ELSEIFfTZf I , JX !  NE  TSUPZ(II)  THEN 
I  Ft  I  FLAGS ( I )  EO.I)  GOTO  It 

CFMZI  I ,  JX)=QSZ(  I ,  JXUSPVZ ( I )  /  ( (TZ!  I ,  JX!-TSUPZ!  I ) ) tCPAtSO  0) 
I FICFMZ!  I ,  JX! .  LE  CFMZMN!  I ,  JX) )  CFMZ !  I ,  JX )--CFMZMN(  I ,  JX ) 

I F (CFMZI I , J X )  6T  CFMZMX ( I ) )  THEN 


v'VA  .V  .VA 


I'.'l'.hVICJi'.ti'JIM-.VAM 


!.•  JJUUklU'l.fkl'Ll'Ll'U’l 


1F( (QS2! ! ,JX) .LT.O.O) .AMD. (TSUPZt I) .GT.TZ( 1 ,JX)))  THEN 
CFNZI I , JX)=CFNZMN( I ,  JX) 

1FLAG8! I ):) 

ELSE 

CFMZ C  i ,  JXUCFHZMXI I ) 

ENOIF 
END  I F 

ELSE 1F(TZ(1,JX). EB  TSUPZt I ) )  THEN 
CFNZf I ,  JXUCFIIZKN! I , J  X ) 

END  I F 
CONTINUE 


C=  =  :======COI»PllTE  CHANGE  IN  INDIVIDUAL  ZONE  AID  FLOW  FR 0M  = 

C====:=:==PBEVIOUS  ITERATION  z:::::::::::::::::::::::::::: 


IF(!CFNZ;:.JX).EO  0  0).AND.(CH*CFM!I).£3.0.0!)  THEN 
DCFN '  I  !  =  0 . 0 

ELSE  I F { (CFMZ ! I , JX)  N£ .  C  Cl  ANC .  (CHKCFNI ! ) . EQ  0  01)  THEN 
DCFNt I )=0 . 02 
ELSE 

DCFN(  I  )sABS(  tCHRCFN! I ) -CFNZ ' I , JX) ! /CHACFM!  I ) ) 

END  IF 

IFIBCFNJ I )  GT  0  II!  IFLAGt: I 
CONTINUE 


sCCNPUTE  NEW  TCTA.  A:R  FLOW 


IFllFlAGe.Eq.il  THEN 
C F NT  =  C  0 
DO  5  1=1, N 

CFMT=CFKT  tCFNZ ( I , JX) 
cfn:i,jx;=cfnt 

IFLAG2:" 

RETURN 
ELSE 
GOTO  1C 
ENOIF 


C==x==5===CONPUTE  INDIVIDUAL  ZONE  AIR  FLOWS  FOB  FIXED  SET  POINT: 
C--  =  =  =  =  =  =  =  =  ANC  OUTSIDE  AIP  CONTROLLED  CONTROL  WETHODS 
C 

DO  I  U!,N 
CHKCFNC 1 ;  =  cfn: ( I , JX ) 

I F ( (OTRH ( I )  LE  0.0)  AND  (CFNZI I ,JX)  EQ  CFHZMX ( I ) ) )  THEN 
GOTO  1 

ELSE  I F ( TZ ( I , JX)  NE  TSUPZ(I))  THEN 
I F ( IFIA60I I )  EQ  I)  GOTO  12 


CFNZI I , JXI=QSZ( I , JX) tSPVZI I ) / I (TZI I , JX)-TSUPZ( I ) I ACPA160  ) 
1FI CFNZI  I ,  JX) . IE . CFNZNNI I ,  JX) )  CFNZI I , JX ) =CFMZMN ( I , JX) 

IF (CFNZI I , JX) . 6T  CFNZNXI 1 ))  THEN 
IFKQSZtl.JX)  IT. 0.0)  . ADD  (TSUPZII)  ST  TZ(  I ,  JX) ) )  THEN 
CFNZ(I,JX;=CFNZNN!I,JX) 

IFLAG8I I ) = 1 
ELSE 

CFNZI I , JX  )=CFNZNX ( I ) 

ENDIF 

ENCIF 

ELSE  IF ( TZI I , JX)  EQ. TSUPZII))  THEN 
CFNZI I ,  JX)=CFNZNN(I ,  JX) 

ENDIF 

CONTINUE 


==C0NPUT£  CHANGE  IN  INDIVIDUAL  ZONE  AIP  FLOW  FNON*«« 
-PREVIOUS  ITERATION  . . . . . . 


I FICFNZ I ! , J X )  E 0  0  0)  THEN 
DCFNID-O  0 

EtSEIFI  ICFNZI I , JX)  NE  0  0  AND  (CHKCFNI I !  EQ  0 . 0 ) )  THEN 
OCFN!  I  )  =  0 . 02 
ELSE 

DCFN!!!=ABS((CHX:FN!I!-CFN*!!,JX))/CHKCFN:I)) 

ENDIF 

IFIDCFNI I !  .GT .  0  01 )  IFLACe=l 
CONTINUE 

======CONPUTE  NEW  TC'AL  AIR  FLOW  ========================:::=== 

IF!  IFLAGE  E5  I)  THEN 
CFMT  =  0 . 0 
DO  2  1=1, N 

CFNV=CFNT*CFMZ i I , JX ) 

CFNI I , JX! =CFMT 
RETURN 
ENDIF 

======CONPUTE  THE  REQUIRED  INOUCTICN  AIR  FLOW  AND============== 

======REKEAT  TENPERAT .  IE  DIFFERENCE,  IT  USED  OR  NEEDED  =  =  =  =  =  =  =  = 


DO  3  1=1, N 
I  FLAG' =  1 

SPVI  ( I  UITPL  +  455  7)Kt  C»l  607S«WR) * ! 0 . 02521  12) 

SPVSC I )=(TSUPZ( I )+N59.75t! 1  0* I . 6078IWLCCI JX ) ! « ( C  02521121 
IFICFNZi  I, JX!  .EQ. CFNZNXI II )  THEN 
CFNZI ( I , JX)=0  D 


I] 


ELSE  IF ( (CFNZt I , JX)  GT . CFNZNN! I,JX)).OR.!QSZ(I,JX).EQ.O.O))  THEN 
CFNZ I ( I , JX)=0  0 
DTRHt  I ) = 0  0 
SOTO  3 

ELSE IFtTPL  BT  TZtl.JX))  THEN 

CFNZ  I  ( I ,  JX)  =  C  t  !OSZ(  I ,  JX)  /  UO .  t  CPA) )-  (CFNZ  ( l,JX)t(TZ(l,JX!- 
♦TSUPZ<l>)/SPVS(l)>)»SPVItl))/(TZ(l,JX)-TPl> 

IFICFNZ! ( I , JX) .  LT  CFNZINf I ) )  THEN 

otrh;!>=o.o 

IF1CFNZKI, JXI.LT. 0  0!  CFNZ  I  ( I , JX j =0 . 0 
ELSE 

CFNZ! ( I , JX)  =  CFNZ INI  I ) 

TSVPZ 1 ( : 5  =  ( <  TCFNIC l,JX)*CTZ'!,JX)-TSUPZCI)) /SPVSL I )  )- 
♦  tQS:;!,JX)/(CPPl60.))t(TZ(l,JX)tCFNZ!N(l)/SPVimm3PV!(l!) 
♦/CFNZINi!) 

DTRHI ! JsTSOFZ I !  I  !-TPL 
ENOIF 

elseif;tpl.lt  tzc t . jx) ;  then 

CrMZ 1 ( ! , JX ) =CFNZ ! M! . ) 

TSUFZmMMCFNZU.JXUITZU.JXMSUPZ'm/SPVSm)- 
♦IQSZ! I , JX) / (COAtJO . ) )+(TZ( I , JX)1CFNZ IN( I ) /SPVI ( I ) ) ! 1SPV I ! ! ) ) 
♦/CFNZINI ! ) 

DTRHI I  JsTSUPZ I ! I !-TPL 
ENOIF 

IF( (DTJK! I ). GT. -0  5)  AIM.  !) .  IT  0.0))  CT»»f  J  ?*C.  P 
CONT ! N  U  E 

RETURN 

ENT 


SN3FL0ATCALLS 
SSTQRAGE .  Z 
C 

SUBROUTINE  SETTICC 

C 

INPL1CIT  REAL  <A-H,L,P-Z) 

0  I  MENS  I  ON  T0AAC4) 

CONNONJ AAAAA/CFN! 50,24) , CFNZ iEC, 24)  ,N,JX,  INOA,  ICNTF.L,  I STSTH. 
♦N!N,NN, AD ! 50 ) , ADZ (50 ) , ACFN(50! , ACFNZISC ,  FRHR (24! ,  FRHRA 
C0NN3N '68888 /DTD( 50! ,DTDT  TSOX.DTDZfSOX.V.VD.lfSCJ.LZTSO.TPL, 

♦  TO ( 50 ) ,  TOO ,  UC 

CONN3N/FFFFF/SPVA(50!,UCZ,AZ(50!  ,CLGZ  (50 , 24  ! ,  TZ(5C ,  24 ) ,  TOAC4 ) 

♦  ,TW8(24)  ,FRQLGT,TP'.  1 , TPl A ,FLUXV, QPl¥( 50)  .ANXECON 

CONNONI GGG66/QSZ (50 , 24) ,012(50,24), TSUPRZ (50) .OTRHCSO) .QHHZOSG ,24 ) 
CONNON/HHHHH  /  RH(24 ! ,PTOA(24),TNIX,SPVZ(50) , VOAS , VOA,WLCC( 24 ) , 

♦WZ  450) ,WR,WNIX,lrLAG1,TlCC(24!1TR(24!l IVCHX .SPVSC.PTOAN, HG , 

♦  TLCCF,IFIAE2,  IFLAG3,  IFIAG4, ST0AM50) , STLCCf  150) , TICCA '24 ) 


I  ill 


6  *  a,  roiki'Ajj 


COMMON/ 1 II 1 1 /SFHP , BFHP , TP S , TP» , SF ANb , RF ANn , SWOT b , BMOT n , DTSF . 
♦DTBF,SFPLD(») ,RFPLD(«) .AMXTLCC 


IFUG3-1 


=====C0MPUTE  THE  LEAVING  COIL  AIR  TEMPERATURE  FOP  TH E  =  = 
x====F I XED  SET  POINT  CONTROL  METHOD. =================== 


IF(  iCNTRL.EQ  I)  THEN 
ncc<jn=uccF 
I F  L  A  G  2  =  1 
RETURN 
ENCIF 


====COMF UTE  THE  LEAVING  COIL  AIR  TEMPERATURE  FOR  THE: 
====ZCNE  CON’ROLLEO  CONTROL  METHOD  ================== 


IF(  ICNTRL  EO  2)  THEN 
IF! ISTSTM  EQ  2)  MIN=MN 

tlcci=ts’.'pr:;min)-dtdt(mini-dtd2(m'N!-dtsf 
IFITLCC1.GT  AMXTLCC)  TICCUAMXUCC 
D!  =  A8S(  TLCC  ' JX1-UCCI !  /  TLCCI JX)) 

I F ID!  GT  0  CCD  THEN 
TLCC(JX!  =  (TLCC(JIWTICC!\'2.C 
RETURN 
ELSE 

TLCC!JX!=TLCCI 

:flag:=i 

RETUSN 

ENCIF 

ENCIF 


=====COMPUTE  THE  LEAVING  COU  AIR  TEMPERATURE  FOR  THE  = 

=====cuts:de  air  controlled  contpol  METHOD  =========== 


IF'  1  CSTR L  EC  3!  THEN 
NSTEP  1  =  I 

XT2=ABS!TCA!JX:-STCA(NSTE?in 


IFIXr:  LT . 0  5 '  THEN 
TLCC!JX)=STLCC(NSTEPi; 

(FLAG2=  1 
RETURN 

ELSE  IFISTOAINSTEP ‘ EC  2j0  D)  THEN 


===  =  =  FLAGS  THE  USER  WHEN  AN  OUTSIDE  AIR  TEMPE R A TUF.E  =  =  =  = 
===== ’ S  ENCOUNTERED  THAT  DOES  NCT  HAVE  A  CORRESPONDING: 
=====LEAVING  COIL  TEMPERATURE  CONTAINED  IN  THE  USER==== 


SsW 


1 

I 

? 


C= . . . . INPUT  CONTROL  SCHEDULE .========================== ========= 

C  =  =  =  ==  =  =  =  =  NOTE  THE  REST  OF  THE  SIMULATION  WILL  EE  B Y P A S SED  =  =  =  =  =  =  =  = = 
C========= I F  THIS  OCCURS  =========================================== 

C 

WR:T£(»,30)  JX , TCA ( JX) 

30  FORMAT (IX, 'OUTSIDE  AIR  TEMPERATURE  ENCOUNTERED  IN  HOUR' IX,  13 
♦  MX/ti.e  ' ,F6 . 2, ' («F) 1  IS  BEYOND  THE  RANGE  OF  TOUR  CONTROL', 

♦/ , IX, 'SCHEDULE .  EITHER  TOUR  CONTROL  METHOD  OR  SCHEDULE  MUST', 
W.U.'BE  CHANGED. '  ,1.1) 

IFLAGA=1 

RETURN 

ELSE 

NSTEP ! =NSTEP  U  t 
GOTO  10 
END  IF 
ENDIF 
C 

RETURN 

END 


JNOFLDATCALLS 
{STORAGE . 2 
C 

SUBROUTINE  ORHEAT 

L 

IMPLICIT  REAL  ( A-H , l . P-I : 

DIMENSION  CFMRH ( 50 ,  2A ) 

COMMON 'AAAAA.'CrM!  50 .  2< ) , CFMO ' 50 , 24! . N . JT ,  I  MCA.  1CNTRL ,  'STS’M. 
*MIN,MN,AC!55’ ,A5I'55‘ ,ACFM'50; ,ACFM!'5I! ,FRHR!D<;  ,FRHR‘ 
common.'03ddd'cpmm'x,cfml:c,cpmr,cfa.:5v,:fl.hgloc,hlc:,h:a,h 

COMMON, 'EEECS, 'PI. TSUP:i5C:,  IFLA.G9 

COMMON -’GGCGG^S:' 50.  ,  QLC '  50 , 0 R '  .  TSL'PP: '  50 ' ,  C*R:J  1 50 !  .5RH5' 

COMMCN.’HHHHH  ' R M  ICS’  , ? ’0*  ’ 24 1  , TM ’ X  , SPYO  ’ 50 '  .WCAS, VOA  ,WLC! !2< I 


*W0 ( 50 !,WR, WMI X, IFLAGl.TLCC'  2AI.TR  CA ! ,  IVCHK ,  S? 


.PTOAM.HG, 


♦  TLCCF,  I  FLAG:,  IFLAG3, IFLAGA ,  STOAU50) ,  STLCC(  150! ,  TICCA  (24) 
COMMON,' AKKRA /CFM2MXI5C ),CFM!MN!5C, 24 !  .CFMOIM! 501, CFMO  1(50, DA 
♦TSUr:i(50!,SPV!(5C!,SPVS(5D),lFlAS5,!FLAG6.IFLAG? 


C=  =  ======  =  COMRUTE  THE  REHEAT  LOAD,  BASED  ON  REHEAT  ;NG  PR'MAPT  =  =  =  =  =  =  = 

C=  =  =  =  =  =  =  =  =  AIR  SL'PPL  I  EC  WITH  THE  TERM !  NAL  REHEAT  AND  CTCL 1  NG==*====== 

C=========STSTEMS  AND  SECONDART  AIR  WITH  THE  VAV  SYSTEM  ============ 

C  =  =  =  =  =  ===  =  NOTE  THE  PROGRAM  WILL  'REHEA T  “  THE  VAV  PPIMAR'  A  .'?  =  =  =  =  =  =  = 
C  =  =  =  =  =  =  =  =  =  IF  A  NEGATIVE  REHEAT  IS  REQUIRED  !i  t  A 1 C  =  =  =  =  =  =  =  =  = = 
C=  =  =  =  =  =  =  =  =  BEING  SUPPLIED  NOT  COOL  ENOUGH  TO  SATISFY  LOADS. )  =  =  = 
C 

DC  1  1=1, N 

I F  ( !  I SYSTM  EQ  2)  AND  (DTRH(I)  GE  0  CD  THEM 


Opy  avnBable  to  DTIC  do®*  a<* 
permit  tuUy  ieproductkfi 


CFMRHt! . JX)  =  CFMZ[ C I . JX; 

ELSE 

CFMRH ( f , J X )  =  CFM Z ( I ,  J X ) 

END  1 F 

I F (ABS(0TRH( I ) ) . LT . 0 . 3 !  DTRK( I )=0 . 0 
1  QRHZ ' ! ,  JX)=CFMRH(  I ,  JXHtO  *FR«RA» CPMl CC*0T RH ( ! !  /  ( C  0252112* 

♦  (TSIiPZ(I.W45S  7>K1  0+1  007tltfLCC(JX))) 

RETURN 

END 


SNCFLCA7CALLS 
J STORAGE . 2 
C 

SUBROUTINE  (JCCQIL 

C 

implicit  real  ;a-h,l,p-:i 

COMMON 7AAAAA'CrM'5C,2A ) , CFM2 1 52 . 24 !  ,N ,  .'X ,  1M0A, !  CN7RL ,  ISTSTM, 
+m;n,mn, Arise) ,ac:<;c: ,acfm:5oj ,acfmz(5cj  ,frhs(2a;  .frkra 
COMMON  7BBBEB7DTD  (5D),DTI)7(50),DTD2(5C!,V,VD,L(5C!,LZ(5C),7PL. 

♦  10(50) , TOO ,  'JO 

COMMON /DC0C2/CPMM IX,  CPMLCC,  CPMR,  CPA.  ,CPV,CPl ,  HGLCC,  HLCC,  HOA,  HPA 
COMMON (FFFFF/SPVA! 50)  ,L'CZ,A!!50)  .CLOZ! 50.24  • , T2(50.24  JOUCO 

♦  ,TW8! 24)  , FRQLG' ,TPL 1 , TPLA, FLCXW. CPLV! 50!  ,  AMXECGN 

COMMON  rHHHHH/RH (24),P7CA;241,TMIX,SPVZ;50!,VCAS,WOA,WLCC!24), 
♦W2 (50 )■  ,VR ,WM1  X ,  1FLAG1 , TlCC'24 ! , I? (24 ) ,  IVCHK ,SPVSC . P TOAM , HG . 
♦TlCCF.lFtAG2,IFlAG3,IFLAG4,$T0A!!5C;,STLCC(l5C;,TLCCA(2‘) 
COMMON 'I !  1 1 !  )SCN?  ,RCFP  ,TPS .  TPR .  SFANr, ,  RFANn ,  SMOTs ,  RMOTn ,  CTEF , 
♦r:*F,SFPL0(4),PFPir(<).ARXTi:: 
COMMCN(JJJJJ/QCCt(24).5PH:24),FROl 

c 

C  =  =  =  =  =  =  =  =  =  COMFl!TE  THE  MASS  FLOW  RATE================================ 

C 

AM0C7 =CFM( I , JX) 160  1FRHRA/ ! (TMIXi 159 . 7 ) 1 ! I . ♦ 1 . 00781 
♦WNIXU0. 025EII2K!  C-FRDL ) ) 

C 

C==*======COHPUTE  THE  M I XE0 ( EN TER  I NG  COIL)  A1P  ENTHALPT . ============ 

C 

HMI X=PTOA ( JXHHOA+ !  1  0-PTOA (  JX ) )  IHR A 
C 

HFLCC=-3 1  85414+  9 9 8 7 6 0 3 1 T L CC I J X ) 

0TCC:TM1  X-HCC :  JX  .• 

IF'ABS(DTCC) . LE  0.25!  DTCC=D  0 
0TPH=-DTCC 
C 

C=========0ETERNINE  IF  COOLING  OP  PREHEATING  IS  REQL ’ RED  =  =  =  =  =  =  =  =  =  =  = 


wvuuqt.je  to  DT[r 

Permit  fully  JecriKr  C  do®*  n 
7  iefflhi«  fe production 


t F ( HM I X  IT  HLCC)  THEN 
QCCL ( JX ) =0  C 
60T0  10 
END  IF 

:  = ==  =  DETERM  1 NE  IF  COIL  IS  WE!  OR  DRY.: 

IFtlVCHK  EC.!)  THEN 
DWCC  =  0 . 0 
EtSE 

DVCC=VM!X-VLCCUX! 

END  IF 

:====CALCULATE  COOLING  COIL  LOAD  ===== 

QCCL!JX)=AM3CT*( HM1 X-HLCC- DWCC  *  HF  ICC  I 
l:  '5CCL(»'X)  LT  SCO  O'  OCCL(.'X.'  =  0  0 

qfk:jx)=c  o 
GOTO  :c 

i====calci;late  preheater  LCAC  ======== 

QPr! :  JX !  =  A«CCT*CP«M !  X*  { DTPH  I 

RETURN 

END 


OATCALLS 

a.g:  : 

SUBROUTINE  PRINPUT 

IMP  L I C '  T  REAL  I A  -  K ,  L ,  •  -  0 ' 

CHARACTER  TNrR  :  !i’ 

CHAR»CTER»:  M'N'M'.’M 
CHARACTER* TR  DES ’ 3N ! 50 T 

COMMON.'  AAA  A  A  'CrM  '50  ,  U  ! ,  Cf«C!50 ,  C< )  ,N  r.  I  MCA,  ICNTRL ,  1STSTM. 

♦m:n.mn,ac'S0' , ‘CC'SC: ,»cfm:;c:,acfmi:s:' . rRH? •:« ;  .fphra 
COMMON ’EESEE-' CTO  150!  .ETC’  ISC!  .CTCZISO  ,V,Y0.  L ( 5C !  ,  L 0 !  5 0  ’  , T P L , 

»TC ! 5C ! , TOO , "C 

COMMON 'FFFFF/ERVA  50 » . B£2 . AJ i 30) , CL62 f SO . 24 1 . T2 { 5C . J , TCA C 2* ' 

* ,  T»6  .'20  .FROLS’,  TPL  l ,  TPLA ,  FLUXW, 0"LW(5" ' , AMXECC1.' 

COMMON 'GGC-GC-I QSZ  !50 ,  :»1 ,  CL  =  :  50, 1«:  .TS'.'PRC:  so:  ,CTRH  ISC'  .QP.HC  ISC.  CA 
COMMON  /  HHHh'H  ’PH '  2  < '  .  P  T  C  A  ■  2  A I  ,  TMi  X  ,SPV=  (SO!  ,  VCAS ,WOA , VLCC 1 04 )  , 

♦WO  !50!  ,WR  ,WMIX ,  'CLAG!  .TLCCIJA  i ,  TR  '  24 : ,  IWOHK  ,  SPYSC  ,PTOAM,  HG . 


iVCi*! 


LIXSL! 


x 


uopy  av^lable  to  DTIC  does  n 

p8rmrt  ^  legible  ieproductk» 


♦  TSUPZ  l  !50'  ,SPV!  !5C)  ,$PVS  1 50) , 1FLAG5 , IFLAG6 , 1 FLAS7 , 1  FLAGS (53, 

=  =  =  =  =  =  =  =  =  0ETERM!NE  IF  PR INTEO  COPIES  OF  INPUT  FILES  ABE  DES ! RED .  === 
10  WR 1 TE (» ,  254 ) 

2S<  FORMAT ( / / ,  IX, '00  YOU  WANT  A  HARD  COPT  OF  THE  PERMANENT  INPUT', 

♦  MX.  'FILES  (i.t  WEATHER ,  LOADS,  SCHEDULES,  etc.HT/N)'  \\) 
BEAD ( t , ' (A  1 ) ' )  TNPBINT 

I F ( TNPR I  NT  EQ  'N'!  RETURN 
I F( ( TNPBINT . NE  ' Y ' )  AND  (TNPBINT, NE  'N'))  THEN 
WRITE'*.*)  '  TCU  MUST  ANSWER  EITHEB  T  OB  *N\  ' 

GOTO  10 
ENCIF 

=  =  =  ss  =  :  =  :NAHE  THE  ZONES  =  :::=  =  =  ;! 

VR I TE (1,255)  N 

2  5  5  FORMAT 1 X ,  'ENTER  THE  DESIGNATOR  !  I  «  NORTH  .WEST ,  OFF :  CE  I,' 

♦  ,'fie.)  FOR  EACH  ZONE. 'TCJ  WILL  NEED  DESIGNATOR:  FOR 

♦  12,'  ZONES  ' , ,  IX ,  'THEY  MUST  SE  LESS  THAN  15  CHARACTERS  EACH  ' 

♦  ,//) 

DO  3  1*1, N 
WRITE;*, 25« )  I 

25f  FORMAT: ’,  5X, 'DESIGNATOR  FOR  ZONE  ',12,  1 

READ  1.Z5T!  OES'lOM  I 
25’  FORV's’IAM; 


:  :  :  s:  ::  s:FR.  '  NT  THE  WEATHER  INTO*  DATA  FILE 


o?en'ii,f:ee='lpt": 

VSi’EII I ,251: 

2  5  2  FORMA' 22X ,  'WEATHER  FILE  DATA 02X,  1 5 :  ‘  =  , 

+  5 9 X , 'MAX  REL  ' , I , MX , ' OUTS  I DE ' , 3X , 'DU’S  IDE ' , SY ,  'PLENTY ' , 

♦  7X,  'HUMIDITY',,',  TAX,  'DRY  BULB ' ,  SX ,  'WET  BULB '.8X. 'ENVELOPE', 

♦5X, 'EXITING', l,7X, 'HOUR ',3X, 'TEMPERATURE', 5X, 'TEMPERATURE ',5X, 

♦  'L0A0',9X,':0!LS'.l,l5X,'!tiF)',I2X,'(eF!',8X,'(BTUiHR:',8X, 

♦  '(»; ?X  2X,  I  l(’='),5X,  II!  '  =  '),5X,8(':'),5X,9!':'I,  It) 

DC  I  UI.2A 

WRITE!!!, 251)  I , TOA 1 1 ) , TWB (I ) , QPLW( I ) , 100  tRHill 
25!  FORMAT t BX . I2.6X.F6  2 , 10X.F6  2.SX ,F8  !,6X,F6  2' 
t  CONTINUE 


=  PR  I  NT  THE  LEAVING  COIL  VERSUS  OUTSIDE  AIR  SCHEDULE: 
=FOR  THE  OUTSIDE  AIR  CONTROLLED  CONTROL  METHOD  ONLY . 


IF !  ICN'RL  EQ.2:  THEN 
WRITE:!!. 250' 


•I 


py  availabie  to  DTIC 

fully  JetriKlc  ^  doe*  a 
7  egibI®  ^Production 


F0PNA7!'!', 22X,'0l'TSIDE  DPT  BUIS  TEMPERATURE  ’ , /  ,23X , 

+ '  VS  COIL  LEAVING  TEMPERATURE 22X ,  ’8  i  '='!,/ 

♦  ,5X,  'OUTSIDE' ,9X, 'LEAVING' ,/ ,5X, 'DRY  BULB' ,8X,  'COIL' 

*5X,  'TEMPERATURE' , SX, 'TEMPERATURE ' , / , 9X, ' (of! ' ,  122 , ' !  cF> ' , 
♦Z,2(5X, tit's’)),//) 

I  CHECKED 

DO  2  1=1,150 

IE(5TCAv  I ) .  EtJ .  999  )  ICHECIU: 

IF  ( I  CHECK  E5  t:  GOTO  : 

VP !  TE '  II  ,253!  STOA ( I ) , STLCC ' ! ) 

F3RMi’!8X,F£  !.  !CX,F6 
COST  INCH 


I F !  I STSTM  EC  2)  THEN 
MINIMUM= 'MIKiMUM  ' 
ELSE 

M'N :mum=  ■ 

ESC ! F 


=  PR !  NT  THE  ZONE  l'N'3'JE  in?’.-  DAT!.  FILE  =  = 


o:  i  ist, n 

WR tTE"  ! .  2583  DESIGN  : ' , AZ ;  1 ) , L !  I ! , LI!  I ! , UCZ 
FORMAT"  t  * , // f  ,5X  . '  INPUT  C*TA  FOP  ZONE  NAN";  8X 

i , 'ZONE  A  P  E  A ' , 2 1 X ,  F 1 2  5,'  SO  FT  '  / ,  3X , 'TP  LSI  CCET  LENGTH  T2  ', 

♦  'BRANCH  .3X.PI2  3,'  FT  ’ , ,’ ,  8  X ,  'EPANCH  DOC’  aNG'H  ' ,  12X.F  !2  5, 
*'  FT  ',1,8?, 'CEILING  *U*  VALVE',  t-X,?::  5,'  B  T  u"  K  -  S  0  "  -  c  F ' ! 
vt 2  55’  r 


F  ORM - T  III ,  3CX.A8,  !3X ,  T  C  T  A 
♦  ,2X, 'LATENT' ,1?,  'Alt  r;o*  , 2? 

♦’energy  t: ■ . ' , a ? .  -holt  , *l 

t '  ’E*P ft »”.'PE ' ,  2?  'ENEPE'i  ,?X 
♦ ' '  BTL'  I  HP  ' '  ,??  "CrK  '  ,8X.  •  IsF 


'  ,5X.  'LIGHTING' , ICX,  'SENE 'ELE ' 
•SET  r:.v"  ,r,  •;  'GH'iv; 

?0 ' . f X , ' LE‘2 '  .  3 ? ,  PA’E  ,3', 

■plenum  •,  'cj,  •  ib’v.'h:'  ■ .  2  x , 

\5X  ’ '  E T  l’ '  H  R  '  ',21.  ' '  BTU'KP  '■  '  ,  ' 


•  «?,!"  =  '  I  .3X2*.?'  '  =  ')!,:?’  I  '  '  =  ' )  ,2*  !"  =  '!, 2X. 91's't, /. 1 ) 

oc  5 

IF! I STSTM  EO  ::  THEN 

VPITE! It, 250!  A ,  OSZ  ( I ,  * ' .  5.2 : : , A I , CFMZMN  •, 

♦OLGZ'I  l !  *  A : '  i QLC-ZI  ;  •  *  *  V '  1  t'PO.G’ 


CONTINUE 


WR  ITEM  1,262) 

FORMAT (//,3k, 'tNCTE  THE  ENER6T  ENTERING  THE  ZONE  IS 
* '  INCLUDED  IN  THE  SENSIBLE  LOAD  ' ) 

i:  =  =  rPR I  NT  THE  NAT  I  MUM  PRINART  AND  SECONDARY  AIR  FLOW=  =  =  =  =  =  =  = 
=====RATES  FOR  THE  VAV  STSTEN  ONLY  ========================== 


IF ! I SYSTN  £0.2)  THEN 
WR i TE( 1 1 ,261 )  CFMZMTI 1 1 ,CFMZ INI  i ) 

FORMAT!  'NATINUN  PR  INAR"  ,  5T , 'NAT  IMUM  INDUCTION' 

W.ZCZ.'Alfi  FLOW  RATE', 5T, 'AIR  FLOW  RATE ' ,  / ,  25X , '  ( CFK) ' 
♦  t£Y, ' (CrN) ',/, 15T,2(5T, 151 '  =  '!), 2! '  =  '),//,22T,F9  2,12T,F9.2) 
END  1 F 
CONTINUE 
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